维度帮助添加到dim
有没有办法给维度添加额外的内容。示例：我的维度为38“，但我希望维度显示38 1/2”。我总是想在实际尺寸上加上1/4英寸或1/2英寸。。
这是一个有点多解释，但只知道我需要它这样做。。。
谢谢 你在考虑使用文本覆盖吗？ 将尺寸后缀更改为1/2或1/4。
标注-->标注样式-->覆盖-->主单位-->后缀。 就像李建议的那样
使用“特性”对话框中的“快速选择”来选择要更改的尺寸
在对话框中，在文本覆盖框中输入¼“=原始尺寸，然后输入一个空格，然后输入¼”
然后在下面找到后缀框并删除内容，使更改内容为38¼“而非38”¼”
又快又脏
要更改图形中的所有尺寸还是仅更改部分尺寸？
你发布的信息越详细，你收到的答案就越好。 这个怎么样。。。
(defun c:Test (/ #Choice #Suffix #SS)
(vl-load-com)
(and
(not (initget 0 "1 2"))
(setq #Choice (getkword "\nDimension Suffix (1 = ½/2 = ¼) : "))
(cond ((eq #Choice "1") (setq #Suffix "½"))
((eq #Choice "2") (setq #Suffix "¼")))
(setq #SS (ssget ":L" '((0 . "DIMENSION"))))
(foreach x (mapcar 'vlax-ename->vla-object
(vl-remove-if 'listp
(mapcar 'cadr (ssnamex #SS))))
(vla-put-textsuffix x (strcat " " #Suffix "\""))))
(princ))
页:
[1]