如何定义带有自定义属性的多段线

ps122hb

一克拉沙 发表于 2014-3-20 09:37
扩展数据应该也可以实现的吧，我还没试过。有空试试看。

研究好了写个总结贴吧，大家学习下，多谢

77077

你确定不是拓展数据ldata?
(defun c:TT ()
(setq EN (Car (EntSel "\n请选择检看属性线: ")))
(setq EN (VLAX-Ename->VLA-Object EN)
        LST (VLAX-LData-list EN)
        )
(print LST)
(princ)
)