你选择的此存标注 在特性里看 叫什么名字 ,如果有这个样式 ,在1:20后面的箭头 下拉菜单找 点击即可。如果没有 记住字高,自己在箭头处 自己建立,箭头大小和字高一样
(defun c:cds () ;cds意即当前的dimstyle,当前的标注样式。
(setvar "cmdecho" 0)
(setq a (entsel "\n请点取一个图元:"))
(setq b (car a))
(setq c (entget b))
(setq d (cdr (assoc 3 c)))
(command "DIMSTYLE" "r" d)
(prin1)
)
双击即可。