r在richtextbox中插入动画/控件

翻译|其它|编辑:郝浩|2005-03-28 11:11:00.000|阅读 1828 次

概述:

# 界面/图表报表/文档/IDE等千款热门软控件火热销售中 >>


在richtextbox中插入图片得方法很多,不过一般不能动,要实现动画至少应该实现一个activex控件,不过.net对activex的支持很差,我试过用c#写了个activex,不过效果很差,根本久不能动。

(备注)这里的差不多是从别人的c++代码(蒋晟)和msdn中得来的(所以,我不是个高手)

这是我在gowk中的一部分代码(有删减)拿来共同学习

using System;
using System.Drawing;
using System.Windows.Forms;
using System.Runtime.InteropServices;

using gowk.common;

namespace gowk.controls
{
  public class GRichTextBox_ :RichTextBox
  {
   public GRichTextBox_()
  {
   }
#region insert ole
public void Insersert(IOleObject oleObj)
{
   RichEidtOle ole=new RichEidtOle(this);
   ole.InsertOle(oleObj);
}
public void Insersert(Control control)
{
   RichEidtOle ole=new RichEidtOle(this);
   ole.InsertControl(control);
}
public void InsertImage(string imageFile)
{
   Image img=Image.FromFile(imageFile);
   Type t=Type.GetTypeFromProgID("ImageOle.GifAnimator.1");
   object o=System.Activator.CreateInstance(t);
   bool b=o is IOleObject;
   if(!b)throw(new System.Exception("无法创建Ole对象"));
   t.InvokeMember("LoadFromFile",
  System.Reflection.BindingFlags.Public|System.Reflection.BindingFlags.Instance|System.Reflection.BindingFlags.InvokeMethod,
null,
o,
  new object[]{imageFile});
  if(b)
  this.Insersert((IOleObject)o);
}
  class RichEidtOle
{
  private RichTextBox _richEdit;
  private IRichEditOle _RichEditOle;
  public RichEidtOle(RichTextBox richEdit)
{
  this._richEdit=richEdit;
}
  private IRichEditOle IRichEditOle
{
get
{
  if(this._RichEditOle==null)
{
  this._RichEditOle=SendMessage(this._richEdit.Handle,API.EM_GETOLEINTERFACE,0);
}
  return this._RichEditOle;
}
}
public void InsertControl(Control control)
{
  if(control==null)return;
  IntPtr pLockBytes=API.CreateILockBytesOnHGlobal(IntPtr.Zero,true);
  IntPtr pStorage=API.StgCreateDocfileOnILockBytes  (pLockBytes,STGM.STGM_SHARE_EXCLUSIVE|STGM.STGM_CREATE|STGM.STGM_READWRITE,0);
  IntPtr pOleClientSite=this.IRichEditOle.GetClientSite();
  REOBJECT roeObject=new REOBJECT();
  roeObject.clsid=Marshal.GenerateGuidForType(control.GetType());
  roeObject.pstg=pStorage;
  roeObject.poleobj=Marshal.GetIUnknownForObject(control);
  roeObject.polesite=pOleClientSite;
  roeObject.dvaspect=DVASPECT.DVASPECT_CONTENT;
  roeObject.dwFlags=ReoObjectFlag.REO_BELOWBASELINE;
  this.IRichEditOle.InsertObject(roeObject);
  control.Select();
  control.Focus();
}
public void InsertOle(IOleObject oleObject)
{
  if(oleObject==null)return;
  Guid guid=oleObject.GetUserClassID();
  IntPtr pLockBytes=API.CreateILockBytesOnHGlobal(IntPtr.Zero,true);
  IntPtr pStorage=API.StgCreateDocfileOnILockBytes(pLockBytes,STGM.STGM_SHARE_EXCLUSIVE|STGM.STGM_CREATE|STGM.STGM_READWRITE,0);
  IntPtr pOleClientSite=this.IRichEditOle.GetClientSite();
  REOBJECT roeObject=new REOBJECT();
  roeObject.clsid=guid;
  roeObject.pstg=pStorage;
  roeObject.poleobj=Marshal.GetIUnknownForObject(oleObject);
  roeObject.polesite=pOleClientSite;
  roeObject.dvaspect=DVASPECT.DVASPECT_CONTENT;
  roeObject.dwFlags=ReoObjectFlag.REO_BELOWBASELINE;
  this.IRichEditOle.InsertObject(roeObject);
}
  [DllImport("User32.dll", CharSet=CharSet.Auto,PreserveSig=false)]
public static extern IRichEditOle SendMessage(IntPtr hWnd, int message, int wParam);
}
  #endregion
}
}


标签:

本站文章除注明转载外,均为本站原创或翻译。欢迎任何形式的转载,但请务必注明出处、不得修改原文相关链接,如果存在内容上的异议请邮件反馈至chenjj@evget.com


为你推荐

  • 推荐视频
  • 推荐活动
  • 推荐产品
  • 推荐文章
  • 慧都慧问
扫码咨询


添加微信 立即咨询

电话咨询

客服热线
023-68661681

TOP