如何用命令选图层

雷

(defun c:AA() (setvar "clayer" (cdr(assoc 8(entget(car(entsel)))))) (princ))

gma

方法是好方法，不过我觉得从图层列表里选择也很快。

cadm0211

你能解释一下你那个命令是什么意思吗，我的邮箱是cadm0211@163.com

花锦绣

在命令行中输入-la


再来s


再来0


       


搞定。

cadm0211

还是不懂

xyp1964

复制以下内容到acad.lsp中变“快捷键”：

1. (DEFUN C:0 () (setvar "clayer" "0"))  ;设到0层
2. (DEFUN C:L* () (COMMAND "LAYER" "T" "*" "")) ;解冻所有层
3. (DEFUN C:L? () (COMMAND "LAYER" "?" "")) ;列层信息
4. (DEFUN C:LA () (COMMAND "LAYER"))  ;层
5. (DEFUN C:LAC () (COMMAND "LAYER" "C"))  ;设层颜色
6. (DEFUN C:LAM () (COMMAND "LAYER" "M"))  ;建并设新层
7. (DEFUN C:LAS () (COMMAND "LAYER" "S"))  ;设当前层
8. (DEFUN C:LAT () (COMMAND "LAYER" "T"))  ;解冻?层
9. (DEFUN C:LF () (COMMAND "LAYER" "F"))  ;冻结?层
10. (DEFUN C:LN () (COMMAND "LAYER" "N"))  ;建新层

复制代码

citybaby81

谢谢大虾