关闭其他图层

guobao1985 · 发表于 2017-10-10 13:42:19

关闭其他图层：guan
图层全开：kai

guobao1985 · 发表于 2017-10-10 13:43:08

本帖最后由 guobao1985 于 2017-10-11 07:53 编辑

网页慢，此贴已经重复，故删除

guobao1985 · 发表于 2017-10-10 13:43:17

(defun c:guan()
  (setvar "cmdecho" 0)
  (setq ss (ssget) nn (sslength ss))
  (command "layer" "off" "*" "y" "")
  (setq n 0)
  (repeat nn
(setq lay (cdr (assoc 8 (entget (ssname ss n)))))
(command "layer" "on" lay "")
(setq n (1+ n))
)
  (prin1)
  )
(defun c:kai()
  (setvar "cmdecho" 0)
  (command "layer" "on" "*" "")
  (prin1)
  )
(prompt "\n关闭其他图层<guan>,图层全开<kai>")
(prin1)

fan_zh · 发表于 2017-10-10 15:28:32

何必这么费劲
layiso图层隔离命令即可

guobao1985 · 发表于 2017-10-11 07:18:18

fan_zh 发表于 2017-10-10 15:28
何必这么费劲
layiso图层隔离命令即可

多谢指教~~~谢谢

guobao1985 · 发表于 2017-10-11 07:47:46

(command "layiso" (ssget) "")

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

[基础] 关闭其他图层