zark 发表于 2015-7-24 20:58:39

请问怎么通过编组名*A1,返回成员实体名称列表(或选择集)呢?谢谢[em18]

;获取当前CAD的所有编组名称
(defun getGroups (/ lis)
(vlax-for n (vla-get-Groups *ADoc*)
    (setq lis (cons (vla-get-name n) lis))
)
(vl-sort lis '<)
)

通过以上函数,可以返回当前图纸所有编组名称,但怎么通过编组名,返回成员的实体名称列表(或者成员选择集)呢,知道的朋友请指点下,谢谢

caoyin 发表于 2015-7-24 21:10:41

(vlax-for OBJ (vla-item (vla-get-Groups *ADoc*)GroupName)
(setq LST (cons (vlax-vla-object->ename OBJ) LST))
)

zark 发表于 2015-7-25 20:28:29

caoyin 发表于 2015-7-24 21:10 static/image/common/back.gif
(vlax-for OBJ (vla-item (vla-get-Groups *ADoc*)GroupName)
(setq LST (cons (vlax-vla-object->ename ...

多谢C版

pengfei2010 发表于 2018-12-18 20:41:46

请问一下,若组名字不存在就会出错怎么处理呀

magicheno 发表于 2022-5-20 21:48:23

感谢大佬分享
页: [1]
查看完整版本: 请问怎么通过编组名*A1,返回成员实体名称列表(或选择集)呢?谢谢[em18]