Andyhon 发表于 2011-3-21 21:15:21

更多的资讯在帮助内的 WcMatch 函数

a170285 发表于 2011-3-21 21:24:26

本帖最后由 a170285 于 2011-3-21 21:24 编辑

回复 Andyhon 的帖子

谢谢你,!但是我可以请教你下吗?
(defun c:of()
(setq cmdecho_bak (getvar "cmdecho"))      ;;;备份响应变量
(setvar "cmdecho" 0)                     ;;;关闭响应变量
      (setq en (car(entsel)))
      (setq la (cdr (assoc 8 (entget en))))
      (command "layer" "off" la "y" "" "")
(setvar "cmdecho" cmdecho_bak)
)

你看看..这是自己根据版主的源码写的一个单关图层....
但是不知道为什么每次都要在加个回车才能做到真正的单关...
我已经在 (command "layer" "off" la "y" "*" "")这句话里面多加了好几个""了但是还是一样..为什么呢?

Andyhon 发表于 2011-3-21 21:45:56

(command "layer" "off" la "y" "" "")
==>
(if (= (strcase la) (strcase (getvar "cLayer")))
(command "layer" "off" la "y" "")
(command "layer" "off" la "")
)

a170285 发表于 2011-3-21 22:00:03

本帖最后由 a170285 于 2011-3-21 22:00 编辑

谢谢了哈..确实是多了一个Y!我也自己检查出来了..原来我是和之前的变量有冲突..谢谢各位

lichunyu 发表于 2011-4-15 20:40:46

在cad内建一个按钮就可以了

raimo 发表于 2011-4-15 21:25:11

其实不必这么麻烦,CAD命令已经自带的这个功能的

2009默认存在,之前的版本可能要安装express工具
命令layiso或者直接打开图层工具点击对应命令按钮
这个就可以实现将选择对象所在图层单独显示, 同时旁边还有个恢复命令按钮,马上恢复到原有状态

sz_9527 发表于 2011-4-19 18:00:57

raimo,我觉得楼主是想完全都用键盘控制，而不用再去找屏幕上的其他按钮。。。至少我就是这样：）
页: 1 [2]
查看完整版本: [已解决]求一个开关图层的源码