属性标记selecte的值

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

你好
如何返回所选属性标记的值？
到目前为止，我只能返回块名。

(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：

copy

(cdr (assoc 1 (entget (car (nentsel)))))

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

谢谢你！吉尔
S.F。

[编程交流] 属性标记selecte的值

发表回复

精选推荐