shmily1023 发表于 2007-7-14 20:56:00

[求助]用LISP Vlisp如何删除扩展属性 Xdata

<p>((-1 . &lt;图元名: 7efcef28&gt;) (0 . "LINE") (330 . &lt;图元名: 7efadc10&gt;) (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>

BDYCAD 发表于 2007-7-17 09:26:00

用entget 涵数取有扩展对象的对象然后MAKE一个 [因为(entget name)这样用时涵数返回的DXF组面不带扩展代码], 把原来的对象entdel删去,这个方式可以用来清理有扩展数据的对象

czcxxx 发表于 2015-11-6 15:24:49

明白了!!!
谢谢!!!!
页: [1]
查看完整版本: [求助]用LISP Vlisp如何删除扩展属性 Xdata