怎样分解一个组!就象CAD的命令GROUP的E选项?

yfy2003 · 发表于 2004-10-2 10:13:00

如题?

王咣生 · 发表于 2004-10-2 16:34:00

回复
void EraseGroup(const char * pGroupName)
{
AcDbDictionary *pGrpDict;
AcDbObjectId pGrpId;
acdbHostApplicationServices()->workingDatabase()->getGroupDictionary(pGrpDict, AcDb::kForWrite);
if (pGrpDict->getAt(pGroupName,pGrpId) == Acad::eOk)
{
AcDbObjectPointer pGrp(pGrpId, AcDb::kForWrite);
pGrp->erase();
pGrpDict->remove(pGrpId);
pGrpDict->close();
pGrp->close();
}
pGrpDict->close();
return;
}

yfy2003 · 发表于 2004-10-2 19:41:00

谢谢王斑竹!
我选择一个组实体!这样得到组的名称!
就象void EraseGroup(const char * pGroupName)里的pGroupName?

王咣生 · 发表于 2004-10-2 21:54:00

选择一个实体,删除Group:
ads_name ent;
AcDbObjectId objId;
int ret;
ads_point pt;
ret = acedEntSel("\n请选择一个组实体:", ent, pt);
acdbGetObjectId(objId, ent);
AcDbObjectPointer  pEnt (objId, AcDb::kForRead );
CString strGrpName;
//assert(pEnt!=NULL);
AcDbVoidPtrArray* pReactors = pEnt->reactors();
if (pReactors != NULL)
{
for (int i = 0; i length(); i++)
{
void* pV = pReactors->at(i);
if (pV != NULL & acdbIsPersistentReactor(pV))
{
AcDbObjectId rId = acdbPersistentReactorObjectId(pV);
pEnt->close();
AcDbObjectPointer pGroup(rId, AcDb::kForWrite    );
strGrpName = pGroup->name();    //得到组名(在这里没什么用)
pGroup->erase();
}
}
}
acedAlert("ok");
assert(strGrpName != NULL);

yfy2003 · 发表于 2004-10-2 22:22:00

明白了！
再次感谢！

怎样分解一个组!就象CAD的命令GROUP的E选项?

发表回复

精选推荐