社区 › Auto Lisp › 属性标记selecte的值

Small Fish 发表于 2022-7-6 12:16:13

属性标记selecte的值

你好
如何返回所选属性标记的值？
到目前为止，我只能返回块名。
 
 
(defun c:ATTvalue (/ blk tag val tg )
(setq ESel (entsel "\nSelect attribuite tag: "))
(setq EL (entget (car ESel)));Entity list
(setq blk (cdr (assoc 2 EL)));block name

(princ)
)
 
谢谢

gile 发表于 2022-7-6 12:47:15

你好
 
使用nentsel：
 
(cdr (assoc 1 (entget (car (nentsel)))))

Small Fish 发表于 2022-7-6 13:39:23

谢谢你！吉尔
S.F。

查看完整版本: 属性标记selecte的值