天气与日历 切换到窄版

 找回密码
 立即注册
中国膜结构网
十大进口膜材评选 十大国产膜材评选 十大膜结构设计评选 十大膜结构公司评选
查看: 151|回复: 0

[每日一码] ARX 创建组实例(新建组,选择实体添加到组,输入层,修改组所在的层)

[复制链接]
  • TA的每日心情
    开心
    昨天 06:36
  • 签到天数: 15 天

    [LV.4]偶尔看看III

    105

    主题

    11

    回帖

    1308

    积分

    管理员

    积分
    1308
    QQ
    发表于 2024-3-14 20:05:03 | 显示全部楼层 |阅读模式
    1. static void TESTgrpcmd()  
    2. {  
    3.         CString strGrp;  
    4.         if(acedGetString(0,采用T("\n输入组名"),strGrp.GetBuffer(10)) != RTNORM)  
    5.         {  
    6.                 return;  
    7.         }  
    8.         strGrp.ReleaseBuffer();  
    9.         ads采用name ss;  
    10.         if(acedSSGet(NULL,NULL,NULL,NULL,ss) != RTNORM)  
    11.         {  
    12.                 return;  
    13.         }  
    14.         CString strLayer;  
    15.         if(acedGetString(0,采用T("\n输入层名称"),strLayer.GetBuffer(10)) != RTNORM)  
    16.         {  
    17.                 acedSSFree(ss);  
    18.                 return;  
    19.         }  
    20.         ////创建组,改变层  
    21.         AcDbGroup* pGrp = new AcDbGroup(strGrp);  
    22.         long len ;  
    23.         acedSSLength(ss,&len);  
    24.         AcDbObjectId idObj;  
    25.         ads采用name enName;  
    26.         AcDbEntity* pEnt;  
    27.         ErrorStatus es;  
    28.         for(int i = 0;i < len;i ++)  
    29.         {  
    30.                 if(acedSSName(ss,i,enName) != RTNORM)  
    31.                 {  
    32.                         continue;  
    33.                 }  
    34.                 acdbGetObjectId(idObj,enName);  
    35.                 pGrp->append(idObj);  
    36.         }  
    37.         pGrp->setLayer(strLayer);  
    38.         ////把组添加到词典中  
    39.         AcDbDictionary* pGrpDic;  
    40.         acdbHostApplicationServices()->workingDatabase()->getGroupDictionary(pGrpDic,AcDb::kForWrite);  
    41.         AcDbObjectId idGrp;  
    42.         pGrpDic->setAt(strGrp,pGrp,idGrp);  
    43.         ////释放内存  
    44.         pGrp->close();  
    45.         pGrpDic->close();  
    46.         acedSSFree(ss);  
    47. }
    复制代码

     

     

     

     

    [每日一码] ARX 创建组实例(新建组,选择实体添加到组,输入层,修改组所在的层)
    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则

    QQ|Archiver|中国膜结构网|中国膜结构协会|进口膜材|国产膜材|ETFE|PVDF|PTFE|设计|施工|安装|车棚|看台|污水池|中国膜结构网_中国空间膜结构协会

    GMT+8, 2024-11-1 13:32 , Processed in 0.124088 second(s), 25 queries .

    Powered by Discuz! X3.5

    © 2001-2024 Discuz! Team.

    快速回复 返回顶部 返回列表