炸开组

admin

1. void GroupExplode()
   
2.   {
   
3.      AcString groupName;
   
4.      if (acedGetString(FALSE, _T("\nName of Group to explode: "), groupName) != RTNORM)
   
5.        return;
   
6.      AcDbObjectId idGroupDict = acdbCurDwg()->groupDictionaryId();
   
7.      AcDbDictionaryPointer pGroupDict(idGroupDict, AcDb::kForWrite);
   
8.      if (pGroupDict.openStatus() == Acad::eOk)
   
9.      {
   
10.        AcDbObjectId idGroup;
    
11.        if (pGroupDict->getAt(groupName, idGroup) == Acad::eOk)
    
12.        {
    
13.          AcDbObjectPointer<AcDbGroup> pGroup(idGroup, AcDb::kForWrite);
    
14.          if (pGroup.openStatus() == Acad::eOk)
    
15.          {
    
16.            if (pGroup->numEntities() > 0) pGroup->clear();
    
17.            pGroup->erase();
    
18.          }
    
19.        }
    
20.        else
    
21.        {
    
22.          acutPrintf(_T("\nGroup '%s' not found in this dwg-file"), groupName.kACharPtr());
    
23.        }
    
24.      }
    
25.   }

复制代码