sunny_8848 发表于 2023-3-6 10:55:26

修改标注比例

请教大家，怎样修改某种标注样式的的标注比例？因为标注比例有时是变化的，无法预先建立这种标注样式

fangmin723 发表于 2023-3-9 11:18:46

;;说明:批量修改标注线性比例
(defun C:DLSF(/ ent lts n ss)
        (command "UNDO" "be")
        (if (= 0 (getvar "USERR2")) (progn (setq lts 1.0) (setvar "USERR2" lts))(setq lts (getvar "USERR2")))
        (if (setq ss (ssget '((0 . "DIMENSION"))))
                (progn
                        (if (setq lts (getreal (strcat "\n请输入标注线性比例<" (rtos lts 2 3) ">："))) (setvar "USERR2" lts) (setq lts (getvar "USERR2")))
                        (setq n -1)
                        (while (setq ent (ssname ss (setq n (1+ n))))
                                (vla-put-LinearScaleFactor (vlax-ename->vla-object ent) lts)
                        )
                )
        )
        (command "UNDO" "e")
        (prin1)
)

x_s_s_1 发表于 2023-3-10 09:23:27

sunny_8848 发表于 2023-3-10 08:43
谢谢您的帮忙。我的本意是不需要选择某个标注对象，直接修改预先建立的某种标注样式的：主单位--测量单位 ...

(defun c:tt (/ a)
(command ".-dimstyle" "r" "standard") ;_"standard"改为自用基准标注
(setvar 'dimscale (getreal "\n全局比例:"))
(setvar 'dimlfac (setq a (getreal "\n比例因子:")))
(command ".-dimstyle" "s" (strcat "my_" (rtos a 2 0))) ;_新建样式自己改
)

sunny_8848 发表于 2023-3-10 08:43:49

fangmin723 发表于 2023-3-9 11:18


谢谢您的帮忙。我的本意是不需要选择某个标注对象，直接修改预先建立的某种标注样式的：主单位--测量单位---比例因子，这样对后续采用这种标注样式的尺寸标注都起效（因为有些图形是缩放绘制的）

vormittag 发表于 2023-3-6 16:11:44

不是 Dimlfac 控制的么？查一下标注样式对应的组码就好了啊。

wzg356 发表于 2023-3-6 18:09:13

vlax-get ob linearsclalefactor

sunny_8848 发表于 2023-3-7 07:59:45

wzg356 发表于 2023-3-6 18:09
vlax-get ob linearsclalefactor

谢谢帮忙，运行错误

vladimirputin 发表于 2023-3-9 09:59:20

这个比例有一个是全局比例吧。

sunny_8848 发表于 2023-3-9 18:46:50

谢谢帮忙，明天测试下

669423907 发表于 2023-3-10 12:48:34

论坛搜索 动态修改标注比例 几年前就有了
页: [1] 2
查看完整版本: 修改标注比例