yang686526

如何修改标注
www.dimcax.com
如何修改标注
只改标注的数值。实际长度不改。
d
ddedit命令就可以
d
试试这个程序：
(setq txt_de "100")
(defun c:de (/ ss txt)
(setvar "cmdecho" 0) (princ "\n 选择需修改的标注:")
(setq ss (ssget))
(if ss (progn (princ "\n 请输入字符（空格＝恢复）<\"")(princ txt_de)
(setq txt (getstring t "\">:"))
(cond ((= txt " ")(setq txt ""))
((= txt "")(setq txt txt_de))
(t (setq txt_de txt))
)
(command "dimedit" "n" txt "p" "")
))(princ)
)
(princ "标注修改程序 命令de")(princ)