将当前图纸中选中的实体克隆生成块到当前图纸将选中的实体生成块后克隆到其他图纸

 1 AcDbObjectId CreatBlockForAcdbobjectidarr(AcDbObjectIdArray ptarr,AcGePoint3d pt, CString sName)
 2 {
 3     //创建一个块参照在当前数据库中
 4     AcDbBlockTable *pBlkTab=NULL;
 5     acdbHostApplicationServices()->workingDatabase()->getBlockTable(pBlkTab, AcDb::kForWrite);
 6     AcDbBlockTableRecord *pBlkTabRcd;
 7     pBlkTabRcd = new AcDbBlockTableRecord();
 8     pBlkTabRcd->setName(sName);
 9     AcDbObjectId blockId;
10     pBlkTab->add(blockId, pBlkTabRcd);
11     pBlkTabRcd->setOrigin(pt);//设置块的插入点 
12     pBlkTab->close();
13     pBlkTabRcd->close();//关闭后获得这个块的id 
14 
15     AcDbIdMapping         adimIdMap;
16     AcApDocument* pDoc = acDocManager->curDocument();
17     acDocManager->lockDocument(pDoc, AcAp::kWrite);//锁定当前文档
18     acdbHostApplicationServices()->workingDatabase()->deepCloneObjects(ptarr, blockId, adimIdMap);//克隆当前选中的实体到块中
19     acDocManager->unlockDocument(pDoc);//解锁文档
20     
21     return blockId;
22 }
23 
24 bool CreatOtherDwgBlockForAcdbobjectidarr(const TCHAR *fileName, const TCHAR *blkDefName, AcDbObjectId Tid)
25 {
26     // 使用_SH_DENYNO参数打开图形(只读打开)，允许其它用户读写该文件
27     AcDbDatabase* pSourceDwg = new AcDbDatabase(false);
28     Acad::ErrorStatus es = pSourceDwg->readDwgFile(fileName, _SH_DENYNO);
29     if (es != Acad::eOk)
30     {
31         delete pSourceDwg;
32         pSourceDwg = NULL;
33 
34         acutPrintf(TEXT("
读入dwg图形错误, 图形名称: %s"), fileName);
35         return false;
36     }
37     // 打开外部图形数据库的块表，寻找给定名称的块表记录
38     AcDbBlockTable* pBlkTable = NULL;
39     es = pSourceDwg->getBlockTable(pBlkTable, AcDb::kForWrite);
40     AcDbObjectId idTemp=AcDbObjectId::kNull;
41     pBlkTable->getAt(blkDefName, idTemp);
42     if (idTemp!=AcDbObjectId::kNull)
43     {
44         acutPrintf(_T("
外部图库文件中已有指定名称的块"));
45         pBlkTable->close();
46         delete pSourceDwg;
47         pSourceDwg = NULL;
48         return false;
49     }
50     AcDbObjectId blockId;
51     AcDbBlockTableRecord *pTempRec = new AcDbBlockTableRecord;
52     pTempRec->setName(blkDefName);
53     pBlkTable->add(blockId, pTempRec);
54     pBlkTable->close();
55     pTempRec->close();
56     AcDbIdMapping         adimIdMap;
57     AcApDocument* pDoc = acDocManager->curDocument();
58     acDocManager->lockDocument(pDoc, AcAp::kWrite);//锁定当前文档
59     AcDbObjectIdArray ptarr;
60     ptarr.append(Tid);
61     acdbHostApplicationServices()->workingDatabase()->wblockCloneObjects(ptarr, blockId, adimIdMap, AcDb::kDrcReplace);
62     acDocManager->unlockDocument(pDoc);//解锁文档
63     pSourceDwg->saveAs(fileName);
64     delete pSourceDwg;
65     pSourceDwg = NULL;
66 }

View Code

相关阅读:
线圈与触发器
 线圈
 sourceinsight 宏
 linu　　micro time
删除 .svn 文件夹
 !!!
ACE_MAIN
窗体的一些主要属性
 http协议的几个概念
 保留每个name的最新日期的数据
原文地址：https://www.cnblogs.com/xzh1993/p/5749571.html

将当前图纸中选中的实体克隆生成块到当前图纸 将选中的实体生成块后克隆到其他图纸

将当前图纸中选中的实体克隆生成块到当前图纸将选中的实体生成块后克隆到其他图纸