社区 › Auto Lisp › 修改标注样式usin

briankstan 发表于 2022-7-6 12:59:58

修改标注样式usin

我搜索了一下，但什么也没找到。
 
我有一个有几种不同尺寸样式的图纸，它们的换算单位是打开的，并且以毫米为单位显示，现在建筑师希望它们以米为单位显示。
 
我不知道如何使用更正的信息更改标注样式。我必须更新大约100张图纸，每张图纸中至少有3种尺寸样式。我知道我可以使用Dimstyle更改它，但如果可以的话，我宁愿自动化这个过程。
 
我需要修改现有的dimstyle，而不使用dim替代。
 
谢谢你的帮助。

Lee Mac 发表于 2022-7-6 13:05:17

试试这个伴侣：
 

(defun c:alt (/ doc)
(vl-load-com)
(vlax-for dim (vla-get-Dimstyles
               (setq doc
                   (vla-get-ActiveDocument
                     (vlax-get-acad-object))))
   (vla-put-activeDimstyle doc dim)
   (setvar "DIMALTF" 0.001)
   (vla-copyfrom dim doc))
(princ))

briankstan 发表于 2022-7-6 13:09:13

不知道如何设置这个？加载它，键入alt，但没有看到它做任何事情。

Lee Mac 发表于 2022-7-6 13:11:07

 
检查你的昏暗风格。

briankstan 发表于 2022-7-6 13:14:56

我看到它创造了一些新的，
 
我想做的是将现有的修改为新的设置，而不必逐个进行。

Lee Mac 发表于 2022-7-6 13:16:43

 
它不应该创造任何东西

briankstan 发表于 2022-7-6 13:20:41

对不起，这是另一个lisp，在填充我的图层之前。
 
它应该做什么？

The Buzzard 发表于 2022-7-6 13:25:09

 
我喜欢李。它改变了Alt单位乘数。那太好了。

Lee Mac 发表于 2022-7-6 13:26:07

它应该做你要求它做的事…：眨眼：
 
将替代单位乘数更改为0.001，以将mm转换为m。

The Buzzard 发表于 2022-7-6 13:30:15

李，
 
我假设这只适用于当前的dimstyle？

查看完整版本: 修改标注样式usin