[ARX程序]：如何删除当前数据库中所有层，使其恢复到只有一个基本的0层呢？

ppengxm

在不关闭当前文档的前提下，如何做到删除当前数据库中所有层，使其恢复到只有一个基本的0层呢？
问题很急，望高手给小妹提供些建议。

rave

最初由 ppengxm 发布
[B]在不关闭当前文档的前提下，如何做到删除当前数据库中所有层，使其恢复到只有一个基本的0层呢？
问题很急，望高手给小妹提供些建议。 [/B]

Look this.

2. 
   
3. #include "dbobjptr.h"
   
4. 
   
5. // Function name    : HYT_ClearLayers
   
6. // Description      : 清除无关图层, 删除ModalSpace中不以"FC_"打头的层
   
7. // Return type      : void
   
8. void HYT_ClearLayers()
   
9. {
   
10. #ifdef OARXWIZDEBUG
    
11.     acutPrintf ("\nOARXWIZDEBUG - HYT_ClearLayers() called.");
    
12. #endif // OARXWIZDEBUG
    
13. 
    
14.     // TODO: Implement the command
    
15. 
    
16.     Acad::ErrorStatus es;
    
17.     AcDbDatabase* pCurDb = acdbHostApplicationServices()-> workingDatabase();
    
18. 
    
19.     AcDbLayerTablePointer spLayerTable(pCurDb,AcDb::kForWrite);
    
20.     es = spLayerTable.openStatus();
    
21.     if (es == Acad::eOk)
    
22.     {
    
23.         AcDbLayerTableIterator* pIterator;
    
24.         spLayerTable-> newIterator (pIterator);
    
25.         
    
26.         AcDbLayerTableRecord* pLayer;
    
27.         char* pLayerName=NULL;
    
28.         
    
29.         for (; !pIterator-> done(); pIterator-> step()) {
    
30.             
    
31.             pIterator-> getRecord (pLayer,AcDb::kForWrite) ;
    
32.             
    
33.             pLayer-> getName(pLayerName);
    
34.             if (acutWcMatch(pLayerName,"FC_*")!=RTNORM)
    
35.             {
    
36.                 if (pLayer-> isLocked())
    
37.                     pLayer-> setIsLocked(false);
    
38.             }
    
39.             pLayer-> close();
    
40.             acutDelString(pLayerName);
    
41.         }
    
42. 
    
43.         delete pIterator ;
    
44.     }
    
45.     else
    
46.         return;
    
47. 
    
48.     AcDbBlockTableRecordPointer spBlkRcd(ACDB_MODEL_SPACE, pCurDb, AcDb::kForRead);
    
49.     es = spBlkRcd.openStatus();
    
50.     if (es == Acad::eOk)
    
51.     {
    
52.         AcDbBlockTableRecordIterator *pIter;
    
53.         es = spBlkRcd-> newIterator(pIter);
    
54.         if (es == Acad::eOk)
    
55.         {
    
56.             AcDbEntity *pEnt;
    
57.             char *pLayerName = NULL;
    
58.             for (pIter-> start(); !pIter-> done(); pIter-> step())
    
59.             {
    
60.                 es = pIter-> getEntity(pEnt,AcDb::kForRead);
    
61.                 if (es == Acad::eOk)
    
62.                 {
    
63.                     pLayerName = pEnt-> layer();
    
64.                     
    
65.                     if (acutWcMatch(pLayerName,"FC_*")!=RTNORM)
    
66.                     {
    
67.                         es = pEnt-> upgradeOpen();
    
68.                         if (es == Acad::eOk)
    
69.                             pEnt-> erase();
    
70.                     };
    
71.                     acutDelString(pLayerName);
    
72.                     pEnt-> close();
    
73.                 }
    
74.             }
    
75.             delete pIter;
    
76.         }
    
77.     }
    
78.     else
    
79.         return;
    
80.    
    
81.     AcDbLayerTableIterator* pIterator;
    
82.     spLayerTable-> newIterator(pIterator);
    
83.    
    
84.     AcDbLayerTableRecord* pLayer;
    
85.     char* pLayerName=NULL;
    
86.    
    
87.     for (; !pIterator-> done(); pIterator-> step()) {
    
88.         
    
89.         pIterator-> getRecord (pLayer,AcDb::kForWrite) ;
    
90.         
    
91.         pLayer-> getName(pLayerName);
    
92.         if (acutWcMatch(pLayerName,"0,FC_*")!=RTNORM)
    
93.         {
    
94.             pLayer-> erase();
    
95.         }
    
96.         pLayer-> close();
    
97.         acutDelString(pLayerName);
    
98.     }
    
99.    
    
100.     delete pIterator;
     
101. }
     
102. 
     

<br /> #include "dbobjptr.h" <br /> <br /> // Function name    : HYT_ClearLayers<br /> // Description      : 清除无关图层, 删除ModalSpace中不以"FC_"打头的层<br /> // Return type      : void <br /> void HYT_ClearLayers()<br /> {<br /> #ifdef OARXWIZDEBUG<br />     acutPrintf ("\nOARXWIZDEBUG - HYT_ClearLayers() called.");<br /> #endif // OARXWIZDEBUG<br /> <br />     // TODO: Implement the command<br /> <br />     Acad::ErrorStatus es;<br />     AcDbDatabase* pCurDb = acdbHostApplicationServices()-> workingDatabase();<br /> <br />     AcDbLayerTablePointer spLayerTable(pCurDb,AcDb::kForWrite);<br />     es = spLayerTable.openStatus();<br />     if (es == Acad::eOk)<br />     {<br />         AcDbLayerTableIterator* pIterator;<br />         spLayerTable-> newIterator (pIterator);<br />         <br />         AcDbLayerTableRecord* pLayer;<br />         char* pLayerName=NULL;<br />         <br />         for (; !pIterator-> done(); pIterator-> step()) {<br />             <br />             pIterator-> getRecord (pLayer,AcDb::kForWrite) ;<br />             <br />             pLayer-> getName(pLayerName);<br />             if (acutWcMatch(pLayerName,"FC_*")!=RTNORM) <br />             {<br />                 if (pLayer-> isLocked())<br />                     pLayer-> setIsLocked(false);<br />             }<br />             pLayer-> close();<br />             acutDelString(pLayerName);<br />         }<br /> <br />         delete pIterator ;<br />     }<br />     else<br />         return;<br /> <br />     AcDbBlockTableRecordPointer spBlkRcd(ACDB_MODEL_SPACE, pCurDb, AcDb::kForRead);<br />     es = spBlkRcd.openStatus();<br />     if (es == Acad::eOk)<br />     {<br />         AcDbBlockTableRecordIterator *pIter;<br />         es = spBlkRcd-> newIterator(pIter);<br />         if (es == Acad::eOk)<br />         {<br />             AcDbEntity *pEnt;<br />             char *pLayerName = NULL;<br />             for (pIter-> start(); !pIter-> done(); pIter-> step())<br />             {<br />                 es = pIter-> getEntity(pEnt,AcDb::kForRead);<br />                 if (es == Acad::eOk)<br />                 {<br />                     pLayerName = pEnt-> layer();<br />                     <br />                     if (acutWcMatch(pLayerName,"FC_*")!=RTNORM)<br />                     {<br />                         es = pEnt-> upgradeOpen();<br />                         if (es == Acad::eOk)<br />                             pEnt-> erase();<br />                     };<br />                     acutDelString(pLayerName);<br />                     pEnt-> close();<br />                 }<br />             }<br />             delete pIter;<br />         }<br />     }<br />     else<br />         return;<br />     <br />     AcDbLayerTableIterator* pIterator;<br />     spLayerTable-> newIterator(pIterator);<br />     <br />     AcDbLayerTableRecord* pLayer;<br />     char* pLayerName=NULL;<br />     <br />     for (; !pIterator-> done(); pIterator-> step()) {<br />         <br />         pIterator-> getRecord (pLayer,AcDb::kForWrite) ;<br />         <br />         pLayer-> getName(pLayerName);<br />         if (acutWcMatch(pLayerName,"0,FC_*")!=RTNORM)<br />         {<br />             pLayer-> erase();<br />         }<br />         pLayer-> close();<br />         acutDelString(pLayerName);<br />     }<br />     <br />     delete pIterator;<br /> }<br /> <br />

XDSoft

最初由 ppengxm 发布
[B]在不关闭当前文档的前提下，如何做到删除当前数据库中所有层，使其恢复到只有一个基本的0层呢？
问题很急，望高手给小妹提供些建议。 [/B]

一个层要删除，必须保证没有对象引用该层，确定后，就可以用AcDbObject::erase() 删除掉了。

判断一个层是否被引用，可以使用

2. <normalfont>
   
3. AcDbDatabase::purge Function Acad::ErrorStatus
   
4. 
   
5. purge(
   
6. 
   
7. AcDbObjectIdArray& ids);
   
8. 
   
9. ids Input array of object ID entities of objects
   
10. 
    
11. </normalfont>
    

<normalfont><br /> AcDbDatabase::purge Function Acad::ErrorStatus<br /> <br /> purge(<br /> <br /> AcDbObjectIdArray& ids);<br /> <br /> ids Input array of object ID entities of objects <br /> <br /> </normalfont><br />

上面是核心步骤，放到层表遍历循环里面判断处理即可了。