工控编程吧

标题: 91上位机VC MFC富编辑框插入图片 [打印本页]

---

作者: qq263946146    时间: 2015-12-16 21:58
标题: 91上位机VC MFC富编辑框插入图片

(, 下载次数: 0)

上传

点击文件名下载附件

91上位机VC MFC富编辑框插入图片

功能展示

富编辑框中显示文字同时再显示图片，图文并茂效果更佳，我们当前例程给CRichEditCtrl播放图片扩展它默认的不支持图片插入功能，效果如图

要点提示

富编辑框中插入图片可以以这种形式实现GetIRichEditOle()->InsertObject(&reobject ); reobject 为REOBJECT 的OLE对象， 创建REOBJECT 首先得创建HBITMAP对象；使用函数LoadImage()便可快速创建HBITMAP位图对象；当前例程以此形式创建 HBITMAP bmp; //创建HBITMAP

bmp = (HBITMAP):oadImage(NULL, sPath,IMAGE_BITMAP, 0, 0,

  LR_LOADFROMFILE|LR_DEFAULTCOLOR|LR_DEFAULTSIZE);其中sPath为位图所在路径；

实现功能

1.新建基于对话框的应用程序

2.新建自定义类class CRichEditCtrlEx : publicCRichEditCtrl，添加头文件#include <afxole.h>

#include <Richole.h>再添加 一函数用于位图void InsertBitmap(CString sPath);

1. void CRichEditCtrlEx::InsertBitmap(CString sPath)
   
2. {
   
3. 
   
4.         HBITMAP bmp;
   
5.         //创建HBITMAP
   
6.         bmp = (HBITMAP)::LoadImage(NULL, sPath, IMAGE_BITMAP, 0, 0,
   
7.                 LR_LOADFROMFILE|LR_DEFAULTCOLOR|LR_DEFAULTSIZE);
   
8. 
   
9.         STGMEDIUM stgm;
   
10.         stgm.tymed = TYMED_GDI;
    
11.         stgm.hBitmap = bmp;
    
12.         stgm.pUnkForRelease = NULL;
    
13.         
    
14.         FORMATETC fm;
    
15.         fm.cfFormat = CF_BITMAP;
    
16.         fm.ptd = NULL;
    
17.         fm.dwAspect = DVASPECT_CONTENT;
    
18.         fm.lindex = -1;
    
19.         fm.tymed = TYMED_GDI;  
    
20.         
    
21.         //创建输入数据源
    
22.         IStorage *pStorage;
    
23.         
    
24.         
    

复制代码

1. //分配内存
   
2.         LPLOCKBYTES lpLockBytes = NULL;
   
3.         SCODE sc = ::CreateILockBytesOnHGlobal(NULL, TRUE, &lpLockBytes);
   
4.         if (sc != S_OK)
   
5.                 AfxThrowOleException(sc);
   
6.         ASSERT(lpLockBytes != NULL);
   
7.         
   
8.         sc = ::StgCreateDocfileOnILockBytes(lpLockBytes,
   
9.                 STGM_SHARE_EXCLUSIVE|STGM_CREATE|STGM_READWRITE, 0, &pStorage);
   
10.         if (sc != S_OK)
    
11.         {
    
12.                 VERIFY(lpLockBytes->Release() == 0);
    
13.                 lpLockBytes = NULL;
    
14.                 AfxThrowOleException(sc);
    
15.         }
    
16.         ASSERT(pStorage != NULL);
    
17.         
    
18.         COleDataSource *pDataSource = new COleDataSource;
    
19.         pDataSource->CacheData(CF_BITMAP, &stgm);
    
20.         LPDATAOBJECT lpDataObject =
    
21.                 (LPDATAOBJECT)pDataSource->GetInterface(&IID_IDataObject);
    
22.         
    
23.         //获取RichEdit的OLEClientSite
    
24.         LPOLECLIENTSITE lpClientSite;
    
25.         this->GetIRichEditOle()->GetClientSite( &lpClientSite );
    
26.         
    
27.         //创建OLE对象
    
28.         IOleObject *pOleObject;
    
29.         sc = OleCreateStaticFromData(lpDataObject,IID_IOleObject,OLERENDER_FORMAT,
    
30.                 &fm,lpClientSite,pStorage,(void **)&pOleObject);
    
31.         if(sc!=S_OK)
    
32.                 AfxThrowOleException(sc);
    
33.         
    
34.         
    

复制代码

1. //插入OLE对象
   
2.         REOBJECT reobject;
   
3.         ZeroMemory(&reobject, sizeof(REOBJECT));
   
4.         reobject.cbStruct = sizeof(REOBJECT);
   
5.         
   
6.         CLSID clsid;
   
7.         sc = pOleObject->GetUserClassID(&clsid);
   
8.         if (sc != S_OK)
   
9.                 AfxThrowOleException(sc);
   
10.         
    
11.         reobject.clsid = clsid;
    
12.         reobject.cp = REO_CP_SELECTION;
    
13.         reobject.dvaspect = DVASPECT_CONTENT;
    
14.         reobject.poleobj = pOleObject;
    
15.         reobject.polesite = lpClientSite;
    
16.         reobject.pstg = pStorage;
    
17.         
    
18.         HRESULT hr = this->GetIRichEditOle()->InsertObject( &reobject );
    
19. 
    
20.         delete pDataSource;
    
21. }
    

复制代码

最后是类的使用，在主对话框中添加富编辑框控件，关联我们的类CRichEditCtrlEx  m_RichEditEx;然后通过按钮函数加载位图即可

  CString s,s1;

  GetDlgItemText(IDC_EDIT1,s);

  s+=".bmp";

  s1.Format("%s",".\\res\\");

  s1+=s;

  m_RichEditEx.InsertBitmap(s1);

我们来演示下功能实现的整个过程

[iqiyi]http://player.video.qiyi.com/572beefa3bcb4f67b772ec12bf342ab1/0/0/w_19rt7hcyv1.swf-albumId=5033729809-tvId=5033729809-isPurchase=0-cnId=12[/iqiyi]

(, 下载次数: 0)

上传

点击文件名下载附件

[note]1[/note]

---

欢迎光临 工控编程吧 (https://www.gkbc8.com/)

Powered by Discuz! X3.4