tranney 发表于 2014-5-4 12:11:00

删除匿名组这个功能为什么不能用了啊,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))
)
)



snowpeakdream 发表于 2014-12-11 12:31:37

我用的2010也不能用,

gufeng 发表于 2015-9-2 11:59:12

本帖最后由 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))
   )
)

tranney 发表于 2015-10-2 09:54:20

谢谢你了,但是我现在都不知道有什么区别呢
页: [1]
查看完整版本: 删除匿名组这个功能为什么不能用了啊,cad2014,64位 win8