469229020@QQ.CO 发表于 2025-3-21 01:48:28

一键修改所有标注样式的小数点代码,为什么我有的标注改不动?标注样式锁死了?

本帖最后由 469229020@QQ.CO 于 2025-3-21 10:03 编辑

(defun c:CHG (/ ss n ent dec)
(setq dec (getint "\n输入小数位数 (例如 1 或 2): "))
(princ "\n选择要修改的标注...")
(setq ss (ssget '((0 . "DIMENSION"))))
(if ss
    (repeat (setq n (sslength ss))
      (setq ent (ssname ss (setq n (1- n))))
      (vla-put-primaryunitsprecision
      (vlax-ename->vla-object ent)
      dec
      )
    )
)
(princ)
)


以上代码,为啥有的可以,有的标注样式,标注小数点改不动呢

yaojing38 发表于 2025-3-21 01:48:29

本帖最后由 yaojing38 于 2025-3-21 15:10 编辑


试试改下标注的这个

ssyfeng 发表于 2025-3-21 08:52:18

标注不是实际测量的数值?

469229020@QQ.CO 发表于 2025-3-21 20:13:56

yaojing38 发表于 2025-3-21 15:09
试试改下标注的这个

这个后续这个勾,确实可以,能在哪里加一句代码,让后续这个勾取消吗?这个后续是什么作呢?

yaojing38 发表于 2025-3-24 10:40:37

469229020@QQ.CO 发表于 2025-3-21 20:13
这个后续这个勾,确实可以,能在哪里加一句代码,让后续这个勾取消吗?这个后续是什么作呢?

我也没找到这个开关的代码。。。手动点一下吧?

469229020@QQ.CO 发表于 2025-3-25 11:51:58

我已经找到这个开关的代码了,问题完美解决了
页: [1]
查看完整版本: 一键修改所有标注样式的小数点代码,为什么我有的标注改不动?标注样式锁死了?