sfzyr 发表于 2022-7-12 03:56:33

块中的圆如何先选择后标注直径

本帖最后由 sfzyr 于 2022-7-12 03:59 编辑

(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),如何实现??

tigcat 发表于 2022-7-12 08:25:02

单选的话用nentsel

sfzyr 发表于 2022-7-12 21:01:45

tigcat 发表于 2022-7-12 08:25
单选的话用nentsel

你可以试一下,没用

tigcat 发表于 2022-7-12 22:50:59

本帖最后由 tigcat 于 2022-7-12 22:53 编辑

(command"dim1""rad" pause "" "")
;xyp1964发表于 2011-10-6 14:24

;下面是自己瞎写的
(command ".dimradius" (cadr(nentsel "选择圆弧或圆:")) "")

sfzyr 发表于 2022-7-12 23:14:25

tigcat 发表于 2022-7-12 22:50
(command"dim1""rad" pause "" "")
;xyp1964发表于 2011-10-6 14:24



感谢,这个标注命令我还是太不能理解了,需要选择一个圆对象,用ENGSEL,把整个LIST表给这个标注命令也可以,现在你是把这个点给他也可以。有点不理解这个指令了
页: [1]
查看完整版本: 块中的圆如何先选择后标注直径