能显示GIF动画的CRichEditCtrl输入框

天云上人

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

这个OLE对象是IGIFShow，好象是微软的一个COM组件，可以显示bmp\jpg\gif等。
, I; K9 f* Z! j1 z- X
下面教你怎么在一个CRichEdit里面插入一个GIF动画：
7 s, K# u- C9 K7 C/ D$ S* q+ g
1 . 你可以先用VC6.0自带的工具OLE View来把IGIFShow的IDL导出来，导出文件为IGIFShow.idl。
' ^6 @1 R, m! y
5 G$ N* e5 A  u& [& i5 G2. 把这个文件加入到你的工程里面。(File View->右键->Add file to folder...)

3. 在VC的IDE里加入MIDL工具。(Tools->Customize->tools->列表框拉到底->添加VC98下面的MIDL.exe)

; @" _  B1 G" m, g% s. T$ P4. File View->右键点击IGIFShow.idl，在弹出菜单里选Compile IGIFShow.idl.
; F- h2 S. U" g: j( G! Y! n/ W/ ]2 w
& W: s6 ?, h/ c6 T% Q, S- A5. 编译完IDL后，生成一个.h文件一个.c文件，把这两个文件都另到工程里去。
4 \" K6 O! [' @# x6 y7 y& I
6. 从CRichEditCtrl继承一个类，添加如下方法就OK了（不要忘了在你的App初始化时调用AfxInitRichEdit();）：
+ G5 n  e9 E4 l* ?3 D) x) M- C/ p0 u
1 {7 O+ {! Z4 n4 Z! e% D///Insert gif from file.
BOOL CEditEx::InsertGif(CString strFileName)
' ]1 f; B) @$ U0 V) J: L  R; X# y3 H7 o{
- M. j$ g3 L. N/ o LPRICHEDITOLE lpRichEditOle=GetIRichEditOle();
LPOLECLIENTSITE lpClientSite=NULL;
- D# F7 c1 R: n5 `* N' A IGIFShow*  lpGifShow=NULL;//Main interface.
SIZEL sizel={0,0};
8 f9 c* d3 @  |  L, j CDC* pDC=GetDC();
  
2 f3 u" r, _4 @+ d+ x2 R0 K* F //Init REOBJECT.
6 O% |# f0 L1 k$ {- W: Z$ z REOBJECT reobject;
  A" b  ?- d; U: x- n3 o: c ZeroMemory(&reobject, sizeof(REOBJECT));
reobject.cbStruct = sizeof(REOBJECT);
1 G5 i& J; g6 r2 W
if (S_OK!=lpRichEditOle->GetClientSite(&lpClientSite))
  goto BAD_RETURN;
  
% o; s4 E/ W& S% A# g5 g //Create the com instance.
if (S_OK!=::CoCreateInstance(CLSID_GIFShow,NULL,CLSCTX_INPROC_SERVER,IID_IGIFShow,(void**)&lpGifShow))
  goto BAD_RETURN;
if (S_OK!=lpGifShow->put_Image(strFileName.AllocSysString()))//Load from file.
  goto BAD_RETURN;
' G+ U7 L2 d% M- o4 q. h. J8 ?& c
& ^+ l* O9 C5 `' E //
4 F8 x  e" A/ |2 J( C lpGifShow->put_BkColor(pDC->GetPixel(1,1));
3 z/ f  G2 b. C DeleteObject(pDC->m_hDC);

3 ]- x6 T$ L3 p" j8 Q% s1 r //Set REOBJECT member,insert it.
reobject.clsid = IID_IGIFShow;
reobject.cp = REO_CP_SELECTION;
reobject.dvaspect = DVASPECT_CONTENT;
reobject.dwFlags = REO_BELOWBASELINE;
7 R$ B, u5 h$ v, u+ K0 I reobject.dwUser = 0;
4 P& ]6 g4 m4 D2 J7 H: [6 z reobject.poleobj = (LPOLEOBJECT)lpGifShow;
reobject.polesite = lpClientSite;
" _( L5 z; S' a$ c1 F reobject.sizel = sizel;
if (S_OK!=lpRichEditOle->InsertObject(&reobject))
  goto BAD_RETURN;
! }. B5 R& u- B" c* @, v
7 D) y, c9 d) Y& } //Free and return.
0 B0 }/ t3 y. [5 l  I; ] lpRichEditOle->Release();
lpClientSite->Release();
7 j" J; g: A% O6 Y6 o lpGifShow->Release();
$ v, @9 l' |: c. @; @; L! [ return TRUE;
BAD_RETURN:
5 k" _: [8 k( C/ K if (NULL!=lpRichEditOle) lpRichEditOle->Release();
6 R7 l2 T' {! I' Q$ F: E) f; J: _ if (NULL!=lpClientSite) lpClientSite->Release();
) N7 l* j" h5 X' t) R3 \ if (NULL!=lpGifShow) lpGifShow->Release();
2 \$ n& \2 ~# l; o7 v9 k return FALSE;
; t6 y7 J, b% d  ]; }3 H0 @) y}
& P9 q! V0 c2 N, p' K
from:http://publishblog.blogchina.com/blog/tb.b?diaryID=2819759