zhynt
发表于 2011-6-23 14:45:50
没装2009,刚刚在2008上试验通过,难道2009与众不同?
pb.v@163.com
发表于 2011-6-23 14:56:02
回复 zhynt 的帖子
谢谢你啦,确实是2009有问题,我的08上也能用,不管啦,用的时候把当前层设为其他就行了,
Andyhon
发表于 2011-6-23 14:57:25
回复 pb.v@163.com 的帖子
..当前图层的情况下会出现一个选项条..
建议您上传如您所说情况的文件(*.dwg)以利调试
pb.v@163.com
发表于 2011-7-2 10:03:29
回复 Andyhon 的帖子
不是DWG的问题,是CAD2009软件的问题,如图所示,如果料带层MATER是当然图层的话,开关就会弹出选项条,而命令就失效了,谢谢各位朋友关注,我用的时候不让料带在当前层就好啦,
Andyhon
发表于 2011-7-2 11:25:53
Command: expert
Enter new value for EXPERT <0>: 1
详帮助....
pb.v@163.com
发表于 2011-7-2 11:35:23
回复 Andyhon 的帖子
;;料带层开关
(defun C:` ()
(if (> (cdr (assoc 62 (entget (TBLOBJNAME "LAYER" "mater"))))
0
)
(if (= (getvar "CLAYER") "mater")
(command "layer" "off" "mater" "y" "")
(command "layer" "off" "mater" "")
)
(command "layer" "on" "mater" "")
)
)
请大哥明示,应该怎么加在哪个位置,我不懂这个LISP的
Andyhon
发表于 2011-7-2 12:07:01
(defun C:` ()
(SetVar "Expert" 1)
(if (MinusP (cdr (assoc 62 (entget (TBLOBJNAME "LAYER" "mater")))))
(command "layer" "on" "mater" "")
(command "layer" "off" "mater" "")
)
(SetVar "Expert" 0)
(princ)
)
pb.v@163.com
发表于 2011-7-2 13:35:55
谢谢,已经是论坛元老了,竟然还这么耐心帮助我,真是好人呀
AMTONNY
发表于 2011-7-3 14:54:57
本帖最后由 AMTONNY 于 2011-7-3 15:20 编辑
这个功能如果能改成框选就好了,而不是只针对固定的图层
pb.v@163.com
发表于 2011-7-12 15:51:50
回复 Andyhon 的帖子
大哥,再次求助一下,现在这个IISP是针对再一个图层,能不能改成按一下一起打开指定的几个图层,再按一个关掉呢,谢谢,感激不尽