社区 › Auto Lisp › 如何设置维度sty

Se7en 发表于 2022-7-6 15:16:57

我使用这样一个简单的条件：

;; give the dimestyle a name.
(if (tblsearch "DIMSTYLE" "<YOUR DIMSTYLE NAME>")
(command "-dimstyle" "r" "<YOUR DIMSTYLE NAME>")
(progn
   (mapcar 'eval
         '(
             (SETVAR "DIMADEC" 0) (SETVAR "DIMALT" 0) (SETVAR "DIMALTD" 2)
             (SETVAR "DIMALTF" 25.4) (SETVAR "DIMALTRND" 0.0) (SETVAR "DIMALTTD" 2)
             ;
             ; ...<snip> All your variables.
             ;
             (SETVAR "DIMTXT" 0.03125) (SETVAR "DIMTZIN" 0) (SETVAR "DIMUPT" 0)
             (SETVAR "DIMZIN"
             )
         )
   (command "-dimstyle" "s" "<YOUR DIMSTYLE NAME>")
   )
)

alanjt 发表于 2022-7-6 15:21:19

我在模板中设置了尺寸，但由于可以清除图形，在启动时，我通过objectdbx插入所有尺寸等。我想知道，如果您在一个文件中更改标注样式，是否可以将其放入另一个文件并覆盖现有标注样式（即使它处于活动状态），就像您“重新定义”块一样？
是我重新定义通过setvars更改的变量的唯一选择吗？

Se7en 发表于 2022-7-6 15:22:44

>ODBX重新定义？
不确定。我将不得不设置一个测试来查看，但我认为它会起作用（重新定义）。
 
顺便说一句，我确信你必须将dimstyle设置为其他值，然后重新定义它。

Se7en 发表于 2022-7-6 15:25:27

看起来“It”不会被重新定义。
我设置了一个测试，并通过ODBX从一个图形复制到当前图形，没有任何更改。
 
抱歉，看起来您需要设置变量。~

alanjt 发表于 2022-7-6 15:28:27

 
我所想的。我想我可以重命名标注样式，导入更新的样式，将所有使用旧样式的对象更改为“新”样式，然后删除旧样式。
 
只设置变量可能更容易/更安全。
 
谢谢你，约翰。

Se7en 发表于 2022-7-6 15:30:55

 
是的，这要容易得多。只需修改上述条件，以确保您始终具有正确的设置。
 
尝试以下操作：
 
( (lambda ( / _dimstyle-setup )
   (defun _dimstyle-setup ( / )
   (mapcar 'eval
             '(
               (SETVAR "DIMADEC" 0) (SETVAR "DIMALT" 0) (SETVAR "DIMALTD" 2)
               (SETVAR "DIMALTF" 25.4) (SETVAR "DIMALTRND" 0.0) (SETVAR "DIMALTTD" 2)
               ;
               ; ...<snip> All your variables.
               ;
               (SETVAR "DIMTXT" 0.03125) (SETVAR "DIMTZIN" 0) (SETVAR "DIMUPT" 0)
               (SETVAR "DIMZIN"
               )
             )
   )

   (if (tblsearch "DIMSTYLE" "<YOUR DIMSTYLE NAME>")
   (progn
       ;; if the dimstyle exists
       ;; make sure its setup properly
       (_dimstyle-setup)
       ;; set it current
       (command "-dimstyle" "r" "<YOUR DIMSTYLE NAME>")
       )
   (progn
       ;; otherwise
       ;; set it up properly
       (_dimstyle-setup)
       ;; save it.
       (command "-dimstyle" "s" "<YOUR DIMSTYLE NAME>")
       )
   )
   )
)

brianhiroshi 发表于 2022-7-6 15:36:20

例如，如果我想在维度的编号前放置一个符号，而不是我想要的维度只有100，该怎么办
Ф100mm？可以制作一个插入符号或单位的lisp吗？
谢谢

Lee Mac 发表于 2022-7-6 15:39:32

更改DIMPOST变量--
 
例如：
 
 
 

brianhiroshi 发表于 2022-7-6 15:42:45

你好谢谢，效果很好！

Lee Mac 发表于 2022-7-6 15:44:54

很高兴它对你有用，还有什么事，尽管问

查看完整版本: 如何设置维度sty