![]() |
[求助]问个扩展数据的问题!
[求助]问个扩展数据的问题!
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 |
所有的时间均为北京时间。 现在的时间是 08:59 PM. |