求助

浮云游子

求一可以在尺寸前加直径符号的程序，同时不要改变所标注尺寸，而下一程序会把标注尺寸改成默认尺寸。 (defun c:zj(/ obj)
(setq obj(ssget'((0 . "DIM*"))))
(command "._dimedit" "n" "%%c<>" obj "")
)

无痕

关键是找出更改后的标注值


dxf 1


TextSuffix


Textprefix

meflying

你有试过吗？


我运行了，并不会改变

无痕

他的意思是标注值人为改变过。比如33.15改为33.20.


而程序中 "%%c&lt;&gt;"         虽然加了前缀，但是数值被改成默认的了。

龙龙仔

;;By 龙龙仔(LUCAS)
;;使用方法PUT "%%C" "HELLO")
;;使用方法PUT "%%C" "")
(defun PUT (VALUE1 VALUE2 / OBJ)
(setq OBJ (entsel "\n选取标註: "))
(if (and (/= OBJ NIL)
(setq OBJ (vlax-ename->vla-object (car OBJ)))
(vlax-write-enabled-p OBJ)
)
(progn
(setq ORG (vla-get-textoverride OBJ))
(if (= "" ORG)
(setq ORG "<>")
)
(setq ORG (strcat VALUE1 ORG VALUE2))
(vla-put-textoverride OBJ ORG)
)
)
(princ)
)

浮云游子

我是新手，请问怎么用，执行命令是什么呀？

wltools

可以直接用cad的功能：


用，properties，把“标注前缀”改为“%%c”即可，

无痕

我也想过，但是“标注前缀”改为“%%c“，当不小心被刷的时候，前缀可能消失

浮云游子

没有找到。