CRichEditCtrl实现MSN/QQ动画表情

• end;
  //建立一个混合文档存取对象
  if StgCreateDocfileOnILockBytes(FLockBytes, STGM_SHARE_EXCLUSIVE or
  STGM_CREATE or STGM_READWRITE, 0, FStorage) <> S_OK then
  begin
  Showmessage('Error to create storage');
  exit;
  end;
  //取得RichEdit的接口
  Sendmessage(Editor.handle,EM_GETOLEINTERFACE,0,LongInt(@FRTF));
  
  if FRTF.GetClientSite(FClientSite)<>S_OK then
  begin
  ShowMessage('Error to get ClentSite');
  Exit;
  end;
  
  CoInitializeEx(nil, COINIT_APARTMENTTHREADED);
  m_lpAnimator := TGifAnimator.Create(Self);
  i_GifAnimator := m_lpAnimator.ControlInterface;
  i_GifAnimator.LoadFromFile('c:\ti.gif');
  i_GifAnimator.QueryInterface(IID_IOleObject, m_lpObject);
  OleSetContainedObject(m_lpObject, True);
  FillChar(ReObject, SizeOf(ReObject), 0);
  ReObject.cbStruct := SizeOf(ReObject);
  m_lpObject.GetUserClassID(clsid);
  ReObject.clsid := clsid;
  reobject.cp := REO_CP_SELECTION;
  //content, but not static
  reobject.dvaspect := DVASPECT_CONTENT;
  //goes in the same line of text line
  reobject.dwFlags := REO_BELOWBASELINE; //REO_RESIZABLE
  reobject.dwUser := 0;
  //the very object
  reobject.poleobj := m_lpObject;
  //client site contain the object
  reobject.polesite := FClientSite;
  //the storage
  reobject.pstg := FStorage;
  sizel.cx := 0;
  sizel.cy := 0;
  reobject.sizel := sizel;
  //Sel all text
  
  SendMessage(Editor.Handle, EM_SETSEL, 0, -1);
  SendMessage(Editor.Handle, EM_GETSEL, dwStart, dwEnd);
  SendMessage(Editor.Handle, EM_SETSEL, dwEnd + 1, dwEnd + 1);
  //Insert after the line of text
  FRTF.InsertObject(reobject);
  SendMessage(Editor.Handle, EM_SCROLLCARET, 0, 0);
  //VARIANT_BOOL ret;
  //do frame changing
  m_lpAnimator.TriggerFrameChange();
  //show it
  m_lpObject.DoVerb(OLEIVERB_UIACTIVATE, Nil, FClientSite, 0, Editor.Handle,Rect);
  
• 上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] 下一页 
• 复制本页网址和标题，发送给你QQ/Msn的好友一起分享
  
  
• CRichEditCtrl实现MSN/QQ动画表情 相关文章：
• ·Fireworks教程 液体金属表面特效制作
• ·多个CSS样式表争夺特定选择符的控制权
• ·HTML表格标记：行的水平对齐属性ALIGN
• ·纯CSS制作的新闻网站中的文章列表
• ·Illustrator绘制精美三维图表实例
• ·Excel表格页码设置打印输出更直观
• ·经典：交换机故障检测检查表
• ·QQ会员成长体系介绍及成长值换算参照表
• ·sqlldr加载数据到不同表的问题
• ·下载：MSN微软官方圣诞表情包
• CRichEditCtrl实现MSN/QQ动画表情 相关软件
• ·火影忍者必杀技表演秀
• ·《文明4》官方科技树图表
• ·图片欣赏-世界名表欣赏
• ·万用表应用技巧
• ·历代CPU最全明细参数表
• ·心理自测表
• ·中国地方菜系及代表菜
• ·注册表结构
• ·用图表说话
• ·化学元素周期表

上一篇:C/C++语言void及void指针深层探索

下一篇:C/C++头文件一览

• 特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作
• 者.文章版权归文章原始作者所有.对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转
• 载的文章有版权问题请联系编辑人员,我们尽快予以更正. 转载请注明来源：http://www.hackhome.com

精品推荐

热点TOP10

特别推荐