第6章 在AutoCAD的"命令"下練習取得對象屬性列表 - ( LISP )

==================================================

取出"圖"对象属性列表:

①命令：(setq en1 (entsel))
選擇對象：
返回一列表：(<圖元名: 400f1d6C> (50.435 7.07628 0.0))
其中<圖元名: 400f1d6C>
(50.435 7.07628 0.0)

②命令：(car en1)
返回：<圖元名: 400f1d6C>

③命令：(cadr en1)
返回：(50.435 7.07628 0.0)

④命令：(setq en1_data (entget (car en1)))
返回："圖的聯合屬性列表"：
( (-1 . <图元名 : 400f1d60>) (0 . "CIRCLE" ) (330 . <图元名; 400 f1cf8>) (5 . "2C" ) (100 . "AcDbEntity") (67 . 0 ) (410 . "Mode1") (8 . "STR" ) (100 . AcDbCirc1e") (10 60.0 15.0 0.0) (40 . 12.5) (210 0.0 0.O 1.0))