在CAD中，有没有将所选图层设为当前图层的快捷键？？？

Question

要是有相应的快捷键请告知，要是没有，能否进行编程自设快捷键，望高手解答，诚挚感谢！备注:有编程成功解决问题者，追加20分！

Answer 1

这个要自己设置，【所选对象为当前图层】命令是“laymcur”，全部写出来的话就不是快捷键了，所以要自己设置。

打开AutoCAD，【工具】->【自定义】->【编辑程序参数】，打开【acad】记事本。

在记事本里面可以看到，【C,   *CIRCLE】【L,       *LINE】等等文字，这些文字都是英文打字的，第一个表示绘制圆的快捷键是C，第二个绘制直线的快捷键是L。

那么【所选对象为当前图层】laymcur快捷键编辑是这样的【TC, *laymcur】，注意每个命令都要换行，保存后，关闭了AutoCAD，重新打开，你输入命令【TC】，你会发现这个快捷键就可以使用了。

以上设置是不是很简单？同样的，命令很长的，你可以设置为快捷键格式就是【快捷键命令, *完整的AutoCAD命令】（注意英文打字）

有的时候，AutoCAD重新安装了，又要重新写，会觉得麻烦，会忘了以前的命令，还有其它方法。写成程序，复制到记事本，以【.lsp】为后缀命名，打开AutoCAD后autolisp加载。那么以后就不用考虑修改快捷键命令了。由于程序只能识别英文，中文说明的话，在中文前面加上英文的【;】，这样才不会影响程序。


(defun c:qx ()     (setvar "cmdecho" 0)  (command "layon")  (setvar "cmdecho" 1) (prin1) ) ;;打开所有图层，快捷键命令QX
(defun c:ff ()     (setvar "cmdecho" 0)  (command "layoff")  (setvar "cmdecho" 1) (prin1) ) ;;选择需要关闭的图层，快捷键命令FF
(defun c:qw ()     (setvar "cmdecho" 0)  (command "layiso")  (setvar "cmdecho" 1) (prin1) ) ;;选择需要隔离的图层，快捷键命令QW
(defun c:tc ()     (setvar "cmdecho" 0)  (command "laymcur")  (setvar "cmdecho" 1) (prin1) ) ;;选择对象为当前图层，快捷键命令TC

Answer 2

我用的是2006的cad，在设计院看到有人设置的图层快捷键，有隐藏其他图层，显示其他图层，隐藏当前图层，切换图层等快捷键，并不像是cad自带的快捷。有会的大哥、大姐教一下。需要什么工具可以发我信箱，270778099@qq.com。谢谢
步骤如下：

依次找CAD工具菜单，自定义，编辑程序参数（acad.pgp）

然后就打开了一个PGP文件。

然后添加下面的内容：（汉字部分是我加的解释，不要带进去。另外，最前面的大写字母，是我定义的内容，你可以根据自己的习惯自己选其他字母或字母组合，因为LAYER首字母L在右手区，所以我尽量用图层首字母T字开头，后加一个字母，仅供参考）

DQ, *ai_molc 将对象图层置为当前。DQ，就是当前喽。

TC, *LAYER 图层对话框。图层首字母。

TTC, *layerp 上一个图层状态。多加了一个T，和上面的命令区别开

TCC, *copytolayer 将图对象复制到XX图层，选好对象后，空格，会出一个对话框，

TD, *layon 图层打开

TF, *layoff 图层关闭

TG, *layiso 将对象所在图层孤立出来，即，关闭除对象图层外的所有图层。支持多选。

TS, *laylck 图层锁定

TSS, *layulk 图层解锁，多加了个S，和上面的区别开。

TTh, *laymrg 图层合并，具体用法我不记得了。呵呵。。只是当时定义了一下。

TZ, *layfrz 图层冻住。

TZZ, *LAYTHW 图层解冻

Tq, *LAYCUR 将所选对象移动到当前图层。注意与DQ命令区别开

Tv, *LAYMCH 将对象移动到XX图层，与TTC类似。只是TTC是复制，这个是移动。

==========

注意， 1。要装上EXPRESS TOOLS，就是传说中的快车工具，才可以的。CAD04安装包里有。或者在网上下。

06以上的版本里安装时默认是会装上的。

2。*号前面的字母，比如我上面的TC，DQ，是自定义内容，后面是命令全称。

保证是 XX *xxxx的格式就行。

3。*号前面的字母，不要与其他命令简称重复，不然，程序会晕的，呵呵。

祝好运~
试了下，不错，谢谢

参考资料：转载