[求助]：如何做到数据库复制？

ppengxm

我想将一个已经有多个层和加载了多种线型号的数据库复制到一个全新的数据库中，要求其中的实体、层、和线型一块跟随复制，该如何做到？

binbin

你可以用acdbCurDwg ()->insert(.......);

ppengxm

不行啊，代码如下，麻烦binbin帮我看看：

Acad::ErrorStatus es;
AcDbDatabase * pDb;
               
AcApDocument* pDoc;
pDoc=acDocManager->curDocument();
es=acDocManager->lockDocument(pDoc);
pDb=acdbHostApplicationServices()->workingDatabase();

AcDbDatabase *acDb;
acDb=new AcDbDatabase(true,true);
acDb->readDwgFile("d:\\test.dwg",_SH_DENYNO,true);

AcGeMatrix3d mat;
mat.setToIdentity();
       
es=pDb->insert(mat,acDb);//在这里返回值是es为eWasOpenForRead

es=acDocManager->unlockDocument(pDoc);

我想将外部的一个数据库实体、层复制到当前文档中。

binbin

看我是这样写的:

1. 
   
2.   [FONT=courier new]
   
3.         AcDbDatabase *pDb = new AcDbDatabase(Adesk::kTrue);
   
4.         es = pDb->readDwgFile(pFileName);
   
5.         if (es != Acad::eOk){delete pDb;return ;}
   
6.         pDb->getSymbolTable(pDbBlockTable, AcDb::kForRead);
   
7.         es = pDbBlockTable->getAt(pBlockName,idBlock);
   
8.         if (es == Acad::eOk)//指定文件找到块
   
9.         {
   
10.                 if (!bExplore)
    
11.                 {
    
12.                         pDbBlockTable->close();
    
13.                        
    
14.                         AcDbDatabase * pOutputDb = new AcDbDatabase(Adesk::kTrue);
    
15.                         es = pDb->wblock(pOutputDb, idBlock);
    
16.                         delete pDb;
    
17.                        
    
18.                         if (acdbCurDwg()->insert(idBlock,pBlockName,pOutputDb,true) != Acad::eOk)
    
19.                         {
    
20.                                 delete pOutputDb;
    
21.                                 return ;
    
22.                         }
    
23.                         delete pOutputDb;
    
24.                        
    
25.                         AcDbBlockTableRecord* pMODELSPACE = NULL;
    
26.                         if (acdbCurDwg()->getSymbolTable(pCurBlockTable, AcDb::kForRead)!=Acad::eOk){return ;}
    
27.                         if (pCurBlockTable->getAt(ACDB_MODEL_SPACE,pMODELSPACE,AcDb::kForWrite)!=Acad::eOk){return ;}
    
28.                         if (pCurBlockTable->getAt(pBlockName,idBlock)!=Acad::eOk){return ;}
    
29.                         pCurBlockTable->close();
    
30.                        
    
31.                         AcDbBlockReference *pBR = new AcDbBlockReference();
    
32.                         pBR->setBlockTableRecord(idBlock);
    
33.                         pBR->setPosition(Base_point);
    
34.                         pBR->setRotation(angle);
    
35.                         es = pBR->setScaleFactors(scale);
    
36.                         if (pMODELSPACE->appendAcDbEntity(pBR)!=Acad::eOk)
    
37.                         {
    
38.                                 delete pBR;
    
39.                                 pMODELSPACE->close();
    
40.                                 return ;
    
41.                         }
    
42. 
    
43.                         pBR->close();
    
44.                         pMODELSPACE->close();
    
45.                         return ;
    
46.                 }
    
47.         }[/FONT]
    

复制代码

ppengxm

谢谢binbin，在你的帮助下，实现了。真的很感谢你！
另外一个问题，有没有方法删除数据库所有实体而不遍历所有实体？
我目前是通过遍历实现，代码如下：
for(pBlkIterAnswer->start();!pBlkIterAnswer->done();pBlkIterAnswer->step())//删除当前所有实体
        {
                AcDbEntity * pEnt;
                es=pBlkIterAnswer->getEntity(pEnt,AcDb::kForWrite);
                es=pEnt->erase(Adesk::kTrue);
                pEnt->close();
               
        }
这样做我觉得太笨了，有没有更好的办法？

binbin

最笨的就是最好的!!

ppengxm

呵呵，这样虽然能够删除实体，但是不能将图层和线型删除。
我现在就想将数据库中所有图层、线型等全部删除，将其清空为一个最基本的数据库。
还望binbin提供建议。

binbin

不如new一个!!

大中子

真令人羡慕！！！

xiaowa

美眉就是帮的人多

lyousme

好羡慕啊！