[求助]问个扩展数据的问题！

muhanleek

在一张图中，有什么可能，会导致一个没有注册的扩展数据应用名注册不了？

另外，请问如何快速的清理掉那些空的扩展数据应用名(无扩展数据)？

muhanleek

知道的，说一声，谢谢！

muhanleek

(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"))
  )
)

这种方法每次都要扫描图形，超慢！！！

Student

1.没遇到这种情况

2.可编程删除没有使用的APPID

用函数(tblnext table-name [rewind]) 得到所有的APPNAME
对每一个APPNAME
如果(ssget "X" '((-3 ("APPNAME"))))为空
就删除这个APP
删除APP的方法，论坛上有