[求助]问个扩展数据的问题!
www.dimcax.com
[求助]问个扩展数据的问题!
在一张图中,有什么可能,会导致一个没有注册的扩展数据应用名注册不了?
另外,请问如何快速的清理掉那些空的扩展数据应用名(无扩展数据)?
d
知道的,说一声,谢谢!
d
(defun c:delapp ()
(setq r (tblnext "appid" t))
(while r
(vl-catch-all-apply 'vla-delete (list(vlax-ename->vla-object(tblobjname "appid" (cdr(assoc 2 r))))))
(setq r (tblnext "appid"))
)
)
这种方法每次都要扫描图形,超慢!!!
d
1.没遇到这种情况
2.可编程删除没有使用的appid
用函数(tblnext table-name [rewind]) 得到所有的appname
对每一个appname
如果(ssget "x" '((-3 ("appname"))))为空
就删除这个app
删除app的方法,论坛上有
d