怎么取得及修改当前动态块选择的可见性
请教各位高手,怎么取得及修改动态块选择的可见性参考
;;obj是目标动态块
;;value是动态块的可见性状态名称
(defun ch-visibility (obj value / pros i pro)
(setq pros (vlax-invoke obj 'GetDynamicBlockProperties))
(setq i 0)
(while (< i (length pros))
(setq pro (nth i pros))
(if (wcmatch (vla-get-propertyname pro) "可见性*,Visibility*")
(vla-put-value pro value)
)
(setq i (1+ i))
)
) 学习中 学习了,太感谢! gaics 发表于 2021-5-13 09:10
参考
;;obj是目标动态块
太感谢了,动态块的属性原来是这么处理的 学习了,太感谢!
页:
[1]