1 #include <ShLwApi.h>
  2 #pragma comment(lib, "ShLwApi.lib")
  3 //插入影像图
  4 Acad::ErrorStatus insertIMGFile(AcDbObjectId& ImgId,CString strCadLayerName,CString strFilePathName,CString KeyWord,AcGePoint2d pntLeftDown,AcGePoint2d pntRightUp)
  5 {
  6 #if _MSC_VER >= 1600
  7 //一定要加载此文件，否则加载影像图时会失败
  8 if (!acrxDynamicLinker->loadModule(_T("acISMobj19.dbx"), true))
  9 {
 10 acutPrintf(_T("无法加载acISMobj19.dbx\n"));
 11 }
 12 #elif _MSC_VER >= 1500
 13 //一定要加载此文件，否则加载影像图时会失败
 14 if (!acrxDynamicLinker->loadModule(_T("acISMobj18.dbx"), true))
 15 {
 16 acutPrintf(_T("无法加载acISMobj18.dbx\n"));
 17 }
 18 #elif _MSC_VER >= 1400
 19 //一定要加载此文件，否则加载影像图时会失败
 20 if (!acrxDynamicLinker->loadModule(_T("acISMobj17.dbx"), true))
 21 {
 22 acutPrintf(_T("无法加载acISMobj17.dbx\n"));
 23 }
 24 #elif _MSC_VER >= 1300
 25 if (!acrxDynamicLinker->loadModule(_T("acISMobj16.dbx"), true))
 26 {
 27 acutPrintf(_T("无法加载acISMobj16.dbx\n"));
 28 }
 29 #else
 30 if (!acrxDynamicLinker->loadModule(_T("acISMobj15.dbx"), true))
 31 {
 32 acutPrintf(_T("无法加载acISMobj15.dbx\n"));
 33 }
 34 #endif
 35 if(strFilePathName.IsEmpty())
 36 return Acad::eInvalidInput;
 37 if(KeyWord.IsEmpty())
 38 {
 39 KeyWord = PathFindFileName(strFilePathName);
 40 }
 41 if(KeyWord.IsEmpty())//该影像已经加载
 42 {
 43 return Acad::eInvalidInput;
 44 }
 45 AcDbDictionary* pDictionary;
 46 Adesk::Boolean bNameInUse;
 47 AcDbObjectId DictionaryId;
 48 AcDbObjectId RasterImgDefId;
 49 AcDbObjectId RasterImgId;
 50 AcDbRasterImageDef* pAcDbRasterImageDef;
 51 Acad::ErrorStatus es;
 52 
 53 //找到当前数据库的imageDictionary
 54 DictionaryId=AcDbRasterImageDef::imageDictionary(acdbHostApplicationServices()->workingDatabase());
 55 if(!DictionaryId.isValid())
 56 {
 57 //该词典还未创建
 58 es = AcDbRasterImageDef::createImageDictionary(acdbHostApplicationServices()->workingDatabase(),DictionaryId);
 59 if(es!=Acad::eOk)
 60 {
 61 return es;
 62 }
 63 }
 64 
 65 //打开词典
 66 es = acdbOpenObject((AcDbObject*&)pDictionary,DictionaryId,AcDb::kForWrite);
 67 if(es!=Acad::eOk)
 68 {
 69 return es;
 70 }
 71 
 72 bNameInUse=pDictionary->has(KeyWord);
 73 //如果词典中不存在该影像
 74 if(!bNameInUse)
 75 {
 76 pAcDbRasterImageDef=new AcDbRasterImageDef;
 77 es = pAcDbRasterImageDef->setSourceFileName(strFilePathName);
 78 if(es!=Acad::eOk)
 79 {
 80 pDictionary->close();
 81 return es;
 82 }
 83 
 84 es = pAcDbRasterImageDef->load();
 85 if(es!=Acad::eOk)
 86 {
 87 pDictionary->close();
 88 return es;
 89 }
 90 es = pDictionary->setAt(KeyWord,pAcDbRasterImageDef,RasterImgDefId);
 91 if(es!=Acad::eOk)
 92 {
 93 pDictionary->close();
 94 return es;
 95 }
 96 pAcDbRasterImageDef->close();
 97 }
 98 else
 99 pDictionary->getAt(KeyWord,RasterImgDefId);
100 pDictionary->close();
101 
102 //设置插入点以及宽度和高度
103 AcDbRasterImage *pRasterImg=new AcDbRasterImage();
104 AcGeVector3d CorVert,HigVert;
105 CorVert.x=pntRightUp.x-pntLeftDown.x;
106 CorVert.y=0;
107 CorVert.z=0;
108 HigVert.x=0;
109 HigVert.y=pntRightUp.y-pntLeftDown.y;
110 HigVert.z=0;
111 pRasterImg->setImageDefId(RasterImgDefId);
112 pRasterImg->setOrientation(AcGePoint3d(pntLeftDown.x,pntLeftDown.y,0),CorVert,HigVert);
113 pRasterImg->setDisplayOpt(AcDbRasterImage::kTransparent , Adesk::kTrue);
114 es=pRasterImg->setLayer(strCadLayerName);
115 if(es!=Acad::eOk)
116 {
117 pRasterImg->close();
118 return es;
119 }
120 
121 //添加到数据库
122 AcDbDatabase *pDb=acdbHostApplicationServices()->workingDatabase();
123 AcDbBlockTable *pBt=NULL;
124 AcDbBlockTableRecord *pRc=NULL;
125 es=pDb->getBlockTable(pBt,AcDb::kForRead);
126 if(es!=Acad::eOk)
127 {
128 pRasterImg->close();
129 return es;
130 }
131 es=pBt->getAt(ACDB_MODEL_SPACE,pRc,AcDb::kForWrite);
132 if (es!=Acad::eOk)
133 {
134 pBt->close();
135 pBt=NULL;
136 pRasterImg->close();
137 return es;
138 }
139 
140 Acad::ErrorStatus result=pRc->appendAcDbEntity(RasterImgId,pRasterImg);
141 if(result!=Acad::eOk)
142 {
143 pRc->close();
144 pBt->close();
145 pRasterImg->close();
146 return es;
147 }
148 ImgId=RasterImgId;
149 
150 pRc->close();
151 pBt->close();
152 pRasterImg->close();
153 return es;
154 }