一个可以显示图片(包括GIF动画)的ATL控件，以及在RichEdit中如何使用此控件插入图片

给大家提供一个可以显示图片(包括GIF动画)的ATL控件，以及在RichEdit中如何使用此控件插入图片。其实自己没做什么，主要是参考了Oleg Bykov的文档，只是把他的代码加进ATL工程中封装成了一个ATL控件，原文地址在：http://www.codeproject.com/KB/graphics/pictureex.aspx
最直接的办法是您下载已经编译好的文件，您下载MaiYuanOleImg.zip然后解压缩，运行解压缩后目录下Reg.bat就可以直接使用此控件了。点击下载
如果您需要对此控件作修改，可以下载此控件的源代码。点击下载
源代码的一点说明，MYOleImage.h和MYOleImage.cpp中的CMYOleImage类用来显示图像和GIF动画。对这个类，绝大部分的代码是从Oleg Bykov的CPictureExWnd这个类Copy而来。
修改的地方主要在OnDraw(ATL_DRAWINFO& di)这个成员函数中。GIF的动画是采用开线程的方式，我想，如果您需要显示几百上千的GIF动画，那会把您的电脑跑得很慢。
自己添加了一个函数Load(BSTR),调用此函数将设置控件要显示的图像。
其他还有小的修改，请参照源代码

然后介绍在RichEdit中使用此控件插入图片（包括GIF动画）, 采用在RichEdit中插入COM对象的方式插入此控件，这里只需要知道此控件对象的CLSID为：CLSID_MYOleImage，以及接口的IID为：IID_IMaiYuanOleImage。调用控件的成员函数Load就可以把图片加载到控件中显示。然后就能显示在RichEdit中了。
  TCHAR Filter[]=_T("JGP文件(*.jpg)|*.jpg;*.jpeg|GIF文件(*.gif)|*.gif|BMP文件(*.bmp)|*.bmp|所有文件(*.*)|*.*||");
    CFileDialog dlgOpen(TRUE,0,0,OFN_HIDEREADONLY|OFN_FILEMUSTEXIST,(LPCTSTR)Filter,NULL);
    if(dlgOpen.DoModal()==IDOK)
    {
  IRichEditOle* lpRichEditOle = m_RichEdit.GetIRichEditOle(); //m_RichEdit为您的RichEdit对象

  IStorage*  lpStorage  = NULL;//存储接口
  IOleObject*  lpOleObject  = NULL;//OLE对象
  LPLOCKBYTES  lpLockBytes  = NULL;//LOCKBYTE
  IOleClientSite* lpOleClientSite = NULL;
  CComPtr<IMaiYuanOleImage> IPic;
  CLSID   clsid;
  REOBJECT  reobject;
  HRESULT   hr;

  if(lpRichEditOle == NULL)
   return;
  //创建IMaiYuanOleImage对象并获取接口
  hr = ::CoCreateInstance(CLSID_MYOleImage,NULL,CLSCTX_INPROC,IID_IMaiYuanOleImage,(LPVOID*)&IPic);
  if( IPic == NULL )
  {
   return;
  }

  BOOL bRet = TRUE;

  try{
   hr = IPic->QueryInterface(IID_IOleObject, (void**)&lpOleObject);//获得数据对象接口
   if( hr != S_OK )
    AfxThrowOleException(hr);
   hr = lpOleObject->GetUserClassID(&clsid);
   if ( hr != S_OK)
    AfxThrowOleException(hr);

   hr = ::CreateILockBytesOnHGlobal(NULL, TRUE, &lpLockBytes);//创建LOCKBYTE对象
   if (hr != S_OK)
    AfxThrowOleException(hr);
   ASSERT(lpLockBytes != NULL);

   hr = ::StgCreateDocfileOnILockBytes(lpLockBytes,//创建复合文档
    STGM_SHARE_EXCLUSIVE|STGM_CREATE|STGM_READWRITE, 0, &lpStorage);
   if (hr != S_OK)
   {
    VERIFY(lpLockBytes->Release() == 0);
    lpLockBytes = NULL;
    AfxThrowOleException(hr);
   }

   lpRichEditOle->GetClientSite(&lpOleClientSite);

   ZeroMemory(&reobject, sizeof(REOBJECT));//初始化一个对象 
   reobject.cbStruct = sizeof(REOBJECT);
   reobject.clsid  = clsid;
   reobject.cp   = REO_CP_SELECTION;
   reobject.dvaspect = DVASPECT_CONTENT;
   reobject.dwFlags = REO_BELOWBASELINE;
   reobject.poleobj = lpOleObject;
   reobject.polesite = lpOleClientSite;
   reobject.pstg  = lpStorage;

   lpOleObject->SetClientSite(lpOleClientSite);//
   hr = lpRichEditOle->InsertObject( &reobject );
   if (hr != S_OK)
    AfxThrowOleException(hr);
   OleSetContainedObject(lpOleObject,TRUE);
   IPic->Load(_bstr_t(dlgOpen.GetPathName())); //装载要显示的图像
  }

  catch( COleException* e )
  {
   TRACE(_T("OleException code:%d"),e->m_sc);
   e->Delete();
   bRet = FALSE;
  }

  // release the interface
  //if( IPic     != NULL )  IPic->Release();
  if( lpOleObject  != NULL )  lpOleObject->Release();
  if( lpOleClientSite != NULL ) lpOleClientSite->Release();
  if( lpStorage  != NULL ) lpStorage->Release();

  lpRichEditOle->Release();
 }
 
这里是使用测试的例子，点击下载

 

 

原来我打算在自己的IM软件中使用RichEdit作为输入框，所以写了这个控件，但是后来决定不使用RichEdit了，就没有再继续完善了。

因为这里显示图片用的是IPicture接口，所以.png图片是无法显示的。

如果需要显示更多的图片，推荐修改此控件的源代码，使用GDI+来显示图片。

如果我以后有时间，我用GDI+来重新实现