炸开组

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.   }

复制代码