找到解决方法了.删除代理图形就可以了.
http://www.theswamp.org/index.php?topic=50731.0
- (defun c:byebye nil
- (vl-load-com)
- (vlax-for o (vla-get-blocks (vla-get-activedocument (vlax-get-acad-object)))
- (if (= "AcDbZombieEntity" (vla-get-objectname o))
- (vla-delete o)
- )
- (vlax-for o2 o
- (if (= "AcDbZombieEntity" (vla-get-objectname o2))
- (vla-delete o2)
- )
- )
- )
- (princ)
- )
|