获取块属性

jay86chan

请问在  命令: (setq en_data (entget (car en))) ((-1 . <图元名: 7df7a350>) (0 .
"INSERT") (330 . <图元名: 7effec10>) (5 . "5E8A") (100 . "AcDbEntity") (67 . 0)
(410 . "Model") (8 . "GCD") (6 . "Continuous") (100 . "AcDbBlockReference") (66
. 1) (2 . "GC200") (10 630189.0 2.6562e+006 110.463) (41 . 0.5) (42 . 0.5) (43
. 0.5) (50 . 0.0220719) (70 . 0) (71 . 0) (44 . 0.0) (45 . 0.0) (210 0.0 0.0
1.0))

中

如何取得(10 630189.0 2.6562e+006 110.463)中的  110.463？
 

这样为什么不行(setq endata (entget (car en)))
             (setq bg (cdddr (assoc 10 endata)))

急啊，在线等~~~~（注：en 是块）

cadddr都不行~~~

crazylsp

是不是caddr  Z坐标

jay86chan

caddr也不行

错误: DXF 组不正确:
(1 . 2.65622e+006)

jay86chan

问题已解决，主要问题出在提出z坐标后是数值，我程序后面想输出，需要转换字符~~~~不过还是要谢谢你

我也想知道，能告诉怎样做吗？