块中的圆如何先选择后标注直径
(defun c:dra ( / code)
(saverror)
(setq ent (entsel "选择圆弧或圆:"))
(setvar "cmdecho" 1)
(command ".dimradius" ent)
(while (wcmatch (getvar "cmdnames") (strcase "*dimradius*"))
(command pause)
)
(restore)
(princ)
)当圆对象在块中,可以先dimradius,能选择,先选择,后用(command ".dimradius" ent),如何实现?? 单选的话用nentsel
你可以试一下,没用
(command"dim1""rad" pause "" "")
;xyp1964发表于 2011-10-6 14:24
;下面是自己瞎写的
(command ".dimradius" (cadr(nentsel "选择圆弧或圆:")) "")
感谢,这个标注命令我还是太不能理解了,需要选择一个圆对象,用ENGSEL,把整个LIST表给这个标注命令也可以,现在你是把这个点给他也可以。有点不理解这个指令了
页:
[1]