能显示GIF动画的CRichEditCtrl输入框

天云上人

前一段时间写一个类似于QQ的聊天工具，本来想从网上找一个现成的支持表情显示的输入框，可惜没找到，没办法，只能参考了一些COM方面的资料，自己封装了一个可以显示GIF动画的RichEdit，原理是在MFC的CRichEditCtrl里面插入一个OLE对象。

这个OLE对象是IGIFShow，好象是微软的一个COM组件，可以显示bmp\jpg\gif等。
: s! s0 G; P1 L4 C
) G8 w) ~3 ~% ^6 ~下面教你怎么在一个CRichEdit里面插入一个GIF动画：

) x" J$ E9 j7 t1 . 你可以先用VC6.0自带的工具OLE View来把IGIFShow的IDL导出来，导出文件为IGIFShow.idl。

2. 把这个文件加入到你的工程里面。(File View->右键->Add file to folder...)
7 C% h" ^6 r. M, x( h/ X! \" D7 H
0 z% Y) K: E! R- h3. 在VC的IDE里加入MIDL工具。(Tools->Customize->tools->列表框拉到底->添加VC98下面的MIDL.exe)
, K: u* r1 d8 w
4. File View->右键点击IGIFShow.idl，在弹出菜单里选Compile IGIFShow.idl.
+ o' u1 O" p. {
5. 编译完IDL后，生成一个.h文件一个.c文件，把这两个文件都另到工程里去。

6. 从CRichEditCtrl继承一个类，添加如下方法就OK了（不要忘了在你的App初始化时调用AfxInitRichEdit();）：

///Insert gif from file.
. ~) m3 q3 y2 F  ~& PBOOL CEditEx::InsertGif(CString strFileName)
{
LPRICHEDITOLE lpRichEditOle=GetIRichEditOle();
- f4 f0 c& C8 I' M0 F6 s) T& Y LPOLECLIENTSITE lpClientSite=NULL;
& a1 U' s. D. B4 W% f: T$ Q% l( x IGIFShow*  lpGifShow=NULL;//Main interface.
) K; u1 @( Q4 e; J3 y- c SIZEL sizel={0,0};
) g# g2 ]  D% N3 L9 q+ J  Y4 B CDC* pDC=GetDC();
  
//Init REOBJECT.
# s5 j' W1 s4 d/ q! q- }) u" g" t3 q" P4 o REOBJECT reobject;
. }/ R+ a9 |7 ?' N: o& q. S1 G2 ? ZeroMemory(&reobject, sizeof(REOBJECT));
reobject.cbStruct = sizeof(REOBJECT);

; a- D" n1 y8 d) `# n, j if (S_OK!=lpRichEditOle->GetClientSite(&lpClientSite))
  goto BAD_RETURN;
7 d1 R& l4 @# O- ~  
5 J; }% a' I- w1 j4 n0 M6 b8 c //Create the com instance.
( H1 O! [' w% w, A! D if (S_OK!=::CoCreateInstance(CLSID_GIFShow,NULL,CLSCTX_INPROC_SERVER,IID_IGIFShow,(void**)&lpGifShow))
# g4 M/ H* c6 _  goto BAD_RETURN;
if (S_OK!=lpGifShow->put_Image(strFileName.AllocSysString()))//Load from file.
% B! V' K8 [% ^  goto BAD_RETURN;

- {* b* Z3 ]3 F$ C3 y  u //
1 }7 q. U$ K4 ?8 u1 P9 Q# ` lpGifShow->put_BkColor(pDC->GetPixel(1,1));
DeleteObject(pDC->m_hDC);

//Set REOBJECT member,insert it.
reobject.clsid = IID_IGIFShow;
/ R# M6 y' r- K reobject.cp = REO_CP_SELECTION;
reobject.dvaspect = DVASPECT_CONTENT;
reobject.dwFlags = REO_BELOWBASELINE;
7 }5 N" d% _& o reobject.dwUser = 0;
5 H! J/ z) i, P. n8 y reobject.poleobj = (LPOLEOBJECT)lpGifShow;
' s5 V: c0 N  x0 P1 u reobject.polesite = lpClientSite;
" h; }7 F  }8 {- F3 h2 W0 W; [ reobject.sizel = sizel;
9 z2 Y& H. o! x4 W& t if (S_OK!=lpRichEditOle->InsertObject(&reobject))
7 G' q5 [7 x1 T' h. M) L  goto BAD_RETURN;
+ u+ D9 J4 |$ v
//Free and return.
+ m; |2 c: J1 T: V) `4 c lpRichEditOle->Release();
" O6 J$ ]* r: \% S lpClientSite->Release();
- @, L+ z5 N+ h, q lpGifShow->Release();
( T. y  ?5 p/ y* k* V: `" J- P return TRUE;
' I6 {- [" G1 E  Q; l9 t4 c' N0 hBAD_RETURN:
5 E& i) A6 [1 b if (NULL!=lpRichEditOle) lpRichEditOle->Release();
if (NULL!=lpClientSite) lpClientSite->Release();
if (NULL!=lpGifShow) lpGifShow->Release();
0 W: B: }- i4 i  y! l return FALSE;
( s; w, K( Y; a/ ~, f}
+ F; G# J  L7 H. P" C
$ h9 c( y1 S7 Cfrom:http://publishblog.blogchina.com/blog/tb.b?diaryID=2819759