如何写标注关联开关?
有时候标注对象要关联,有时候要解除关联,怎么用lisp写出来?(defun c:11()
(setvar "dimassoc" (if (= (getvar "dimassoc") 2) 1 2))
(if (= (getvar "dimassoc") 2)(princ"标注关联已开启。")(princ"标注关联已关闭。"))
(princ)) 这个没有顺序可言了。一开始就做判断了,如果当前dimassoc的值为2,运行此命令就会改为1,如果当前dimassoc的值为1,运行此命令就会改为2。自己多操作一下。
(setvar "dimassoc" 1) ;创建非关联标注对象。
(setvar "dimassoc" 2) ;创建关联标注对象。
qazxswk 发表于 2024-2-16 17:46
(setvar "dimassoc" 1) ;创建非关联标注对象。
(setvar "dimassoc" 2) ;创建关联标注对象。
我是想用一个快捷键来切换这两个功能,不是设置两个快捷键。就像Ctrl+1一样。 万能command 龙年大吉!
w090212y 发表于 2024-2-11 08:19
万能command
能具体写出来吗? ferious 发表于 2024-2-11 09:51
龙年大吉!
谢谢,谢谢,你也一样,龙年大吉。 (setvar "dimassoc" 1) ;创建非关联标注对象。
(setvar "dimassoc" 2) ;创建关联标注对象。 然後做一個工具圖像..直接互相切換. shenhung 发表于 2024-2-17 13:20
然後做一個工具圖像..直接互相切換.
这个就无所谓了,自己设置一个快捷键就行了。 (defun c:11()
(setvar "dimassoc" (if (= (getvar "dimassoc") 2) 1 2))
(princ))
页:
[1]
2