[ARX程序]：如何根据组名将组里的所有实体删除？

spaceh

参考了论坛里原来关于创建组的代码，如下：
int createGroup(CString sGroupName,
const AcDbObjectIdArray &idArr)
{
AcDbGroup *pGroup = new AcDbGroup((LPSTR)(LPCTSTR)sGroupName);
AcDbObjectId groupObjectId;
AcDbDictionary *pGroupDict = NULL;

acdbHostApplicationServices()->workingDatabase()
->getGroupDictionary(pGroupDict, AcDb::kForWrite);
pGroupDict->setAt(sGroupName, pGroup, groupObjectId);
pGroupDict->close();
acdbOpenObject(pGroup, groupObjectId, AcDb::kForWrite);
for (int i = 0; i < idArr->length(); i++)
{
groupObjectId = idArr->at(i);
pGroup->append(groupObjectId);
}
pGroup->close();
return TRUE;
}

偶想根据组名来删除组里的所有实体，不知道怎么样写？大哥帮帮忙好不？
是调用AcDbGroup里的clear吧，怎么样使用呢？^_^

reader

如果想把实体从数据库中删除，用Adesk::UInt32 allEntityIds(  AcDbObjectIdArray& ids) const;
得到组实体，然后erase

spaceh

在reader的提示下，我实现了实体的删除！嘻嘻，给大家分享^_^

        AcDbEntity *pEnt;
        AcDbObjectIdArray bArray;
        AcDbDictionary *pGroupDict;
        acdbHostApplicationServices()->workingDatabase()->getGroupDictionary(pGroupDict,AcDb::kForWrite);
        AcDbObjectId groupId;
        pGroupDict->getAt("spaceh",groupId);
        AcDbGroup *pGroup;
        acdbOpenObject(pGroup,groupId,AcDb::kForWrite);
        int temp=pGroup->allEntityIds(bArray);
        for(int i=0;i<temp;i++)
        {
                if (acdbOpenObject(pEnt,bArray,AcDb::kForWrite) == Acad::eOk)
                {
                        pEnt->erase();
                }  
                pEnt->close();
                }
       
        pGroup->close();
        pGroupDict->close();