acdbtext如何加入AcDbDatabase

BDYCAD

1. 
   
2. //InObjIDList为输出对象ID表
   
3. //fileName为输出文件名称，格式如_T("C:\\abc.dwg")
   
4. bool acdbSaveAsR14Dwg(AcDbObjectIdArray InObjIDList,const ACHAR* fileName){
   
5. if (InObjIDList.length()==0)return FALSE;//没有对象，所以不往下远行程序，防止输出空文档
   
6. AcDbDatabase *pDb = new AcDbDatabase();
   
7. AcDbBlockTable *pBtbl;
   
8. pDb->getSymbolTable(pBtbl, AcDb::kForRead);
   
9. AcDbBlockTableRecord *pBtblRcd;
   
10. pBtbl->getAt(ACDB_MODEL_SPACE, pBtblRcd,AcDb::kForWrite);
    
11. pBtbl->close();
    
12. AcDbObjectId ObjID;
    
13. AcDbEntity *pEnt;
    
14. AcGeMatrix3d xform1;
    
15. AcGePoint3d ptStart(0,0,0), ptEnd(0,0,0);
    
16. xform1.setTranslation(AcGeVector3d(ptEnd-ptStart));
    
17. AcDbObjectId layid;
    
18. AcDbLayerTable *pLayerTbl; //先声明一个空的层表指针
    
19. pDb->getSymbolTable(pLayerTbl,AcDb::kForWrite);//当前图形数据库打开层表为写入状态
    
20. AcDbLayerTableRecord *pLayerTblRcd= new AcDbLayerTableRecord();//笔线层表记录
    
21. pLayerTblRcd->setName(_T("1")); //设定图层名
    
22. pLayerTblRcd->setIsFrozen(0); // 图层解冻
    
23. pLayerTblRcd->setIsOff(0); // 打开图层
    
24. pLayerTblRcd->setVPDFLT(0); // 使用默认视口
    
25. pLayerTblRcd->setIsLocked(0 ); // 图层解锁
    
26. AcCmColor color; // AcCmColor是ACAD颜色管理类
    
27. color.setColorIndex(1);// 图层颜色为红色  
    
28. pLayerTblRcd->setColor(color);
    
29. pLayerTbl->add(pLayerTblRcd);
    
30. pLayerTblRcd->close();
    
31. pLayerTblRcd=new AcDbLayerTableRecord();//中心线层表记录
    
32. pLayerTblRcd->setName(_T("2")); //设定图层名
    
33. pLayerTblRcd->setIsFrozen(0); // 图层解冻
    
34. pLayerTblRcd->setIsOff(0); // 打开图层
    
35. pLayerTblRcd->setVPDFLT(0); // 使用默认视口
    
36. pLayerTblRcd->setIsLocked(0 ); // 图层解锁
    
37. color.setColorIndex(7);// 图层颜色为黑色
    
38. pLayerTblRcd->setColor(color);
    
39. pLayerTbl->add(pLayerTblRcd);
    
40. pLayerTblRcd->close();
    
41. pLayerTblRcd=new AcDbLayerTableRecord();//线槽层表记录
    
42. pLayerTblRcd->setName(_T("5")); //设定图层名
    
43. pLayerTblRcd->setIsFrozen(0); // 图层解冻
    
44. pLayerTblRcd->setIsOff(0); // 打开图层
    
45. pLayerTblRcd->setVPDFLT(0); // 使用默认视口
    
46. pLayerTblRcd->setIsLocked(0 ); // 图层解锁
    
47. color.setColorIndex(5);// 图层颜色为黑色
    
48. pLayerTblRcd->setColor(color);
    
49. pLayerTbl->add(pLayerTblRcd);
    
50. pLayerTblRcd->close();
    
51. pLayerTbl->close();
    
52. AcGePoint3dArray PointList;
    
53. for (int i=0;InObjIDList.length()>i;i++)
    
54. {
    
55.   ObjID=InObjIDList.at(i);
    
56.   if (acdbOpenObject(pEnt,ObjID,AcDb::kForWrite)!=Acad::eOk)continue;
    
57.   const ACHAR *ObjNameChar=pEnt->isA()->name();
    
58.   const ACHAR *ObjLayer=pEnt->layer();
    
59.   PointList.removeAll();
    
60.   pEnt->getStretchPoints(PointList);
    
61.   pEnt->close();
    
62.   if (!_tcscmp(ObjNameChar,_T("AcDbLine")))
    
63.   {
    
64.    AcDbLine *newEnt=new AcDbLine(PointList.first(),PointList.last());
    
65.    pBtblRcd->appendAcDbEntity(newEnt);
    
66.    newEnt->setLayer(ObjLayer);
    
67.    newEnt->close();
    
68.   }
    
69.   if (!_tcscmp(ObjNameChar,_T("AcDbPolyline"))||
    
70.    !_tcscmp(ObjNameChar,_T("AcDb2dPolyline")))
    
71.   {
    
72.    AcDb2dPolyline *newEnt=new AcDb2dPolyline(AcDb::k2dSimplePoly,PointList,0.0,Adesk::kFalse);
    
73.    pBtblRcd->appendAcDbEntity(newEnt);
    
74.    newEnt->setLayer(ObjLayer);
    
75.    newEnt->close();
    
76.   }
    
77.   if (!_tcscmp(ObjNameChar,_T("AcDbCircle")))
    
78.   {
    
79.    AcDbCircle *pCir;
    
80.    if (acdbOpenObject(pCir,ObjID,AcDb::kForWrite)==Acad::eOk)
    
81.    {
    
82.     AcGePoint3d Cpt=pCir->center();
    
83.     ads_real Radius=pCir->radius();
    
84.     pCir->close();
    
85.     pCir=new AcDbCircle();
    
86.     pCir->setCenter(Cpt);
    
87.     pCir->setRadius(Radius);
    
88.     pCir->setLayer(ObjLayer);
    
89.     pBtblRcd->appendAcDbEntity(pCir);
    
90.     pCir->close();
    
91.    }
    
92.   }
    
93.   if (!_tcscmp(ObjNameChar,_T("AcDbText")))
    
94.   {
    
95.    AcDbText *pText;
    
96.    if (acdbOpenObject(pText,ObjID,AcDb::kForWrite)==Acad::eOk)
    
97.    {
    
98.     ACHAR TextChar[MAX_PATH],LayerChar[MAX_PATH];
    
99.     ads_real TextHigth=pText->height();
    
100.     _tcscpy(TextChar,pText->textString());
     
101.     AcGePoint3d Cpt=pText->position();
     
102.     AcDbObjectId TSid=pText->textStyle();
     
103.     pText->close();
     
104.     pText=new AcDbText();
     
105.     pText->setLayer(ObjLayer);
     
106.     pText->setTextString(TextChar);
     
107.     pText->setHeight(TextHigth);
     
108.     pText->setHorizontalMode(AcDb::kTextCenter);
     
109.     pText->setTextStyle(TSid);
     
110.     pText->setLayer(ObjLayer);
     
111.     //te->setVerticalMode(AcDb::kTextVertMid);
     
112.     pText->setAlignmentPoint(Cpt);
     
113.     AcDbBlockTable *blocktable;
     
114.     acdbHostApplicationServices()->workingDatabase()->getSymbolTable(blocktable,AcDb::kForRead);
     
115.     pDb->getSymbolTable(blocktable,AcDb::kForRead);
     
116.     AcDbBlockTableRecord *blocktablerecord;
     
117.     blocktable->getAt(ACDB_MODEL_SPACE,blocktablerecord,AcDb::kForWrite);
     
118.     blocktablerecord->appendAcDbEntity(pText);
     
119.     pBtblRcd->appendAcDbEntity(pText);
     
120.     blocktable->close();
     
121.     blocktablerecord->close();
     
122.     pText->close();
     
123.    }
     
124.   }
     
125. }
     
126. pBtblRcd->close();
     
127. pDb->saveAs(fileName, false, AcDb::kDHL_1014);
     
128. delete pDb;
     
129. return TRUE;
     
130. }

复制代码

如上代我近来正在写的代码。是把对象输出一个DWG文件，但是文字输不出，请高手指点一下我，怎么写才对？？

286168051

测试中 明天给您答复

风树

286168051 发表于 2013-6-24 19:32
测试中 明天给您答复

有答案吗，我也想知道

luowy

看来没人肯回答阿。
那我来把

1，运行时识别，直接用下面的

1. 
   
2. if (pEnt->isKindof( AcDbText::desc ) )//判断实体是不是acdbtext，其他对象同此操作
   
3. {....}
   

复制代码

2，你这个是将选中的代码另存为一个dwg，直接使用pNewEnt = pEnt->clone()，来在内存中创建一个与pEnt一模一样的对象。其余不用变。

BDYCAD

感 谢楼上大侠：）