删除匿名组这个功能为什么不能用了啊,cad2014,64位 win8
;删除匿名组. oklxx.2005.10.(defun c:del*g ()
(vlax-for obj (vla-get-groups (vla-get-activedocument(vlax-get-acad-object)))
(if (wcmatch (vla-get-name obj)"'**")(vla-delete obj))
)
)
我用的2010也不能用, 本帖最后由 gufeng 于 2015-9-2 12:00 编辑
(defun c:del*g ()
(vlax-for obj (vla-get-groups (vla-get-activedocument(vlax-get-acad-object)))
(if (wcmatch (vla-get-name obj)"`**")(vla-delete obj))
)
) 谢谢你了,但是我现在都不知道有什么区别呢
页:
[1]