能显示GIF动画的CRichEditCtrl输入框

天云上人

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

这个OLE对象是IGIFShow，好象是微软的一个COM组件，可以显示bmp\jpg\gif等。
/ h8 y% E9 N1 j1 K7 R6 ?- K8 y
下面教你怎么在一个CRichEdit里面插入一个GIF动画：
% K/ {4 l9 a/ ?( ~
1 . 你可以先用VC6.0自带的工具OLE View来把IGIFShow的IDL导出来，导出文件为IGIFShow.idl。

5 o6 y, P) ?  \2. 把这个文件加入到你的工程里面。(File View->右键->Add file to folder...)

, x! G& R8 x8 x, a4 P3. 在VC的IDE里加入MIDL工具。(Tools->Customize->tools->列表框拉到底->添加VC98下面的MIDL.exe)

4. File View->右键点击IGIFShow.idl，在弹出菜单里选Compile IGIFShow.idl.

5. 编译完IDL后，生成一个.h文件一个.c文件，把这两个文件都另到工程里去。
8 V9 z" h6 O) t4 f$ a) n
6. 从CRichEditCtrl继承一个类，添加如下方法就OK了（不要忘了在你的App初始化时调用AfxInitRichEdit();）：
8 L7 s+ E3 D" D- g& l# Q
///Insert gif from file.
BOOL CEditEx::InsertGif(CString strFileName)
; l+ a# |, j: R{
- ~  X6 H- r4 V. r5 E. z) W LPRICHEDITOLE lpRichEditOle=GetIRichEditOle();
" p, |+ i# t( m6 Z" T3 y; _/ m- Y LPOLECLIENTSITE lpClientSite=NULL;
$ ~( Y7 X) P7 _0 Q IGIFShow*  lpGifShow=NULL;//Main interface.
; X0 E4 A  s% j  s, `$ t  a SIZEL sizel={0,0};
CDC* pDC=GetDC();
% o  c0 c. {8 q( o4 E, L4 P& C  
//Init REOBJECT.
REOBJECT reobject;
ZeroMemory(&reobject, sizeof(REOBJECT));
8 Y" Y* X. D: j8 z reobject.cbStruct = sizeof(REOBJECT);

  j4 U; E# U9 w1 |- m if (S_OK!=lpRichEditOle->GetClientSite(&lpClientSite))
  goto BAD_RETURN;
# w: D8 Q+ f( i  
//Create the com instance.
; \  X& h( q  o/ [, ]; f  p% j' X* X if (S_OK!=::CoCreateInstance(CLSID_GIFShow,NULL,CLSCTX_INPROC_SERVER,IID_IGIFShow,(void**)&lpGifShow))
7 o: T3 s+ Q0 G+ [5 x1 |  goto BAD_RETURN;
if (S_OK!=lpGifShow->put_Image(strFileName.AllocSysString()))//Load from file.
  goto BAD_RETURN;

# W+ P, T# Y  D8 B# @# C  N- e( } //
lpGifShow->put_BkColor(pDC->GetPixel(1,1));
DeleteObject(pDC->m_hDC);
6 l, x7 ~3 I0 }' l3 s
  u& s9 V; K% k4 e$ p& H //Set REOBJECT member,insert it.
( p; q% C+ O0 o2 T7 ^2 g! U reobject.clsid = IID_IGIFShow;
9 |# {: ?0 z: ]4 f+ x reobject.cp = REO_CP_SELECTION;
reobject.dvaspect = DVASPECT_CONTENT;
9 F+ E# ^) S5 d5 ]8 [ reobject.dwFlags = REO_BELOWBASELINE;
$ J; \' Y9 K$ ^6 ~5 a6 a reobject.dwUser = 0;
reobject.poleobj = (LPOLEOBJECT)lpGifShow;
2 k: V" l1 D# f  X5 D4 a" ` reobject.polesite = lpClientSite;
reobject.sizel = sizel;
if (S_OK!=lpRichEditOle->InsertObject(&reobject))
/ _+ i5 ]9 w' n  goto BAD_RETURN;
( A* T) R$ ]: x( V3 C$ L1 L
//Free and return.
lpRichEditOle->Release();
lpClientSite->Release();
7 H) f1 {  H; O3 U: F) y lpGifShow->Release();
return TRUE;
BAD_RETURN:
if (NULL!=lpRichEditOle) lpRichEditOle->Release();
( @$ F& x8 `  [2 I" w2 r if (NULL!=lpClientSite) lpClientSite->Release();
if (NULL!=lpGifShow) lpGifShow->Release();
. w4 ^. m' q3 M! `7 `* B/ k* m return FALSE;
, r: i  ?6 Q2 M0 C3 P}

from:http://publishblog.blogchina.com/blog/tb.b?diaryID=2819759