lyb_530 发表于 2008-11-19 12:38:00

求助

哪位高手可以帮忙写个吗<br/>比如我有1 2 3 4 5 6 7 8&nbsp;&nbsp; 这八个图层<br/>我想用W1作为快捷键控制1 2 3图层<br/>W2&nbsp;&nbsp;控制&nbsp; 4 5 6&nbsp; 图层<br/>W3&nbsp;&nbsp;&nbsp; 控制&nbsp;7 &nbsp;8&nbsp;&nbsp; 图层<br/>只要我键入快捷键就可以在CAD图纸上只显示该快捷键相应的图层,其它图层为隐藏<br/>怎么写个程序呢???

ZZXXQQ 发表于 2008-11-19 21:17:00


(defun c:w1 ()
(setvar "CMDECHO" 0)
(command "-layer" "T" "*" "_S" "1" "F" "*" "T" "2,3" "")
(setvar "CMDECHO" 1)
(princ)
)
(defun c:w2 ()
(setvar "CMDECHO" 0)
(command "-layer" "T" "*" "_S" "4" "F" "*" "T" "5,6" "")
(setvar "CMDECHO" 1)
(princ)
)
(defun c:w3 ()
(setvar "CMDECHO" 0)
(command "-layer" "T" "*" "_S" "7" "F" "*" "T" "8" "")
(setvar "CMDECHO" 1)
(princ)
)

lyb_530 发表于 2008-11-19 23:47:00

非常感谢哈,很有用呢,呵呵!

lyb_530 发表于 2008-11-20 00:54:00

<p>如果我的图层名字不是数字命名的,</p><p>而是文字命名的,</p><p>是不是就是把数字改为文字就可以了??</p><p>我不要冻结的</p><p>我要图层打开或者关闭,</p><p>是不是吧 T 改为&nbsp; ON&nbsp; 就可以了??</p><p></p>
页: [1]
查看完整版本: 求助