求助图层开关：按一下关指定图层，再按一下开指定图层

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是针对再一个图层，能不能改成按一下一起打开指定的几个图层，再按一个关掉呢，谢谢，感激不尽

账号		自动登录	找回密码
密码			注册

求助图层开关：按一下关指定图层，再按一下开指定图层

本帖子中包含更多资源

评分