能显示GIF动画的CRichEditCtrl输入框

天云上人

前一段时间写一个类似于QQ的聊天工具，本来想从网上找一个现成的支持表情显示的输入框，可惜没找到，没办法，只能参考了一些COM方面的资料，自己封装了一个可以显示GIF动画的RichEdit，原理是在MFC的CRichEditCtrl里面插入一个OLE对象。
8 O8 X* {0 w$ S, h8 W
# E( l" ~3 i, t这个OLE对象是IGIFShow，好象是微软的一个COM组件，可以显示bmp\jpg\gif等。
% C- B5 G; s8 ~8 ~8 n5 p
下面教你怎么在一个CRichEdit里面插入一个GIF动画：
, p5 [" w% c# }* R/ k2 N8 I& m" D
1 . 你可以先用VC6.0自带的工具OLE View来把IGIFShow的IDL导出来，导出文件为IGIFShow.idl。
/ z+ d0 b& t+ ~' C  v4 u0 N
2. 把这个文件加入到你的工程里面。(File View->右键->Add file to folder...)

3. 在VC的IDE里加入MIDL工具。(Tools->Customize->tools->列表框拉到底->添加VC98下面的MIDL.exe)
1 A2 @0 B( c& i% f: ]0 N( k: K
4. File View->右键点击IGIFShow.idl，在弹出菜单里选Compile IGIFShow.idl.
: L4 ]* J- n. W4 ?+ u' A, u& s
, ]3 r9 v9 B+ d5. 编译完IDL后，生成一个.h文件一个.c文件，把这两个文件都另到工程里去。
; f1 w7 {8 w2 A' v+ X0 i
6 a9 G+ Y  K- E1 t: F! _6. 从CRichEditCtrl继承一个类，添加如下方法就OK了（不要忘了在你的App初始化时调用AfxInitRichEdit();）：

/ q9 n0 K2 Z1 ]( s///Insert gif from file.
4 a8 P7 B; ?1 o! I* g3 q2 a) UBOOL CEditEx::InsertGif(CString strFileName)
+ a$ }, r- o5 I{
) u3 {/ V; k" j LPRICHEDITOLE lpRichEditOle=GetIRichEditOle();
  l3 L7 T4 q1 W4 ?6 P& K# `+ i LPOLECLIENTSITE lpClientSite=NULL;
IGIFShow*  lpGifShow=NULL;//Main interface.
SIZEL sizel={0,0};
CDC* pDC=GetDC();
% I1 m1 M* P6 V. s$ e  
. ?( ]& d& g$ ]  \9 M //Init REOBJECT.
0 o) Z( U9 V& O  m- C( N REOBJECT reobject;
ZeroMemory(&reobject, sizeof(REOBJECT));
$ J- A& |( W" n$ \7 j reobject.cbStruct = sizeof(REOBJECT);
3 Z- W2 s1 _! P$ F* j
if (S_OK!=lpRichEditOle->GetClientSite(&lpClientSite))
' ^/ G# [* b2 c- ]- b8 T# D  goto BAD_RETURN;
  
//Create the com instance.
# R% k5 N, h9 ~8 T5 G5 w+ E 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;
. I, t6 }/ X  ?' Y2 `! R
//
( |" v" [; T+ ^( | lpGifShow->put_BkColor(pDC->GetPixel(1,1));
DeleteObject(pDC->m_hDC);

) f1 t/ c0 z( L$ _& C1 D7 F6 O //Set REOBJECT member,insert it.
& r( `4 [- Q2 q0 O: y reobject.clsid = IID_IGIFShow;
reobject.cp = REO_CP_SELECTION;
reobject.dvaspect = DVASPECT_CONTENT;
reobject.dwFlags = REO_BELOWBASELINE;
4 |/ B/ k. u( P reobject.dwUser = 0;
) C1 t9 n+ w  P' E8 O% v/ f reobject.poleobj = (LPOLEOBJECT)lpGifShow;
reobject.polesite = lpClientSite;
: F$ e" v% t1 d( F- U reobject.sizel = sizel;
if (S_OK!=lpRichEditOle->InsertObject(&reobject))
- {' ^) }( U" e) H8 C, n* O  goto BAD_RETURN;
' p9 O5 z3 K8 U9 ^
8 F% R" I" ^# N9 a" V0 A+ ^+ i+ O //Free and return.
lpRichEditOle->Release();
lpClientSite->Release();
lpGifShow->Release();
! }. u- A! C+ ]  \* { return TRUE;
3 H2 ?* f5 T; ?0 v& cBAD_RETURN:
if (NULL!=lpRichEditOle) lpRichEditOle->Release();
0 T9 U" F/ `$ U if (NULL!=lpClientSite) lpClientSite->Release();
, u5 O: p! v: O9 ^1 I  h if (NULL!=lpGifShow) lpGifShow->Release();
1 _8 e, A1 f! `; l# `3 o return FALSE;
7 ~- c+ l( `! T* ~5 `}
" l/ g6 c* \% s& e$ c) M* ?
from:http://publishblog.blogchina.com/blog/tb.b?diaryID=2819759