[求助]用LISP Vlisp如何删除扩展属性 Xdata
<p>((-1 . <图元名: 7efcef28>) (0 . "LINE") (330 . <图元名: 7efadc10>) (5 . <br/>"17E9D") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (6 . <br/>"Continuous") (100 . "AcDbLine") (10 1.0 1.0 0.0) (11 5.0 5.0 0.0) (210 0.0 0.0 <br/>1.0) <font color="#f70909">(-3 ("Test_Application" (1000 . "This is a test for xdata") (1003 . "0") <br/>(1040 . 1.23479e+040) (1041 . 1.23732e+009) (1001 . 32767) (1071 . 32767) (1042 <br/>. 10.0) (1010 -2.95 100.0 -20.0) (1011 4.0 401.0 2.79899))))</font></p><p><font color="#000000">我想删除图元上的扩展数据 上面红色部分,请问用LISP VLISP如何操作? </font></p> 用entget 涵数取有扩展对象的对象然后MAKE一个 [因为(entget name)这样用时涵数返回的DXF组面不带扩展代码], 把原来的对象entdel删去,这个方式可以用来清理有扩展数据的对象 明白了!!!谢谢!!!!
页:
[1]