切换图层状态

lizhu · 发表于 2013-3-20 14:10

我也是
为什么不能自动获取图层状态列表呢？而是空白的呢？

有123 · 发表于 2013-4-28 00:31

我对这个用的不多

xxdxx001 · 发表于 2013-7-26 09:48

我的也是，图框里什么也没有

yzxgwl · 发表于 2013-9-23 21:59

再加强一点就更好了！能保存自己的图层状态并恢复就更好了。

峰峰兒 · 发表于 2013-9-24 07:21

提示: 作者被禁止或删除内容自动屏蔽

vlisp2012 · 发表于 2013-9-24 07:49

CAD2014
我也是
为什么不能自动获取图层状态列表呢？而是空白的呢？

depgfdepgf · 发表于 2013-12-21 08:25

谢谢分享，支持！

香田里浪人 · 发表于 2013-12-21 11:37

;;----------------------
;;将所选实体层置为当前层
;;----------------------
(defun c:dqc (/ ent ent_data clay olay)
  (setq olay (getvar "clayer"))
  (setq ent (car (entsel (strcat "\n选择物体/当前层为<" olay ">:"))))
  (if (/= nil ent)
(progn
   (setq ent_data (entget ent))
   (setq clay (cdr (assoc 8 ent_data)))
   (setvar "clayer" clay)
   (prompt (strcat "\n成功将图层设为<" clay ">："))
)
  )
)

清风明月名字 · 发表于 2014-4-22 18:57

yjr111 发表于 2013-1-5 14:55
可以吗？可以就上源码！免币下载！

谢谢楼主分享，辛苦了！

bjzxdvip · 发表于 2014-5-17 22:55

首先要建立图层状态

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

峰峰兒峰峰兒当前离线积分 10947 明经币个注册时间 2010-8-7 在线时间小时威望金钱个贡献激情	发表于 2013-9-24 07:21 \| 显示全部楼层提示: 作者被禁止或删除内容自动屏蔽

	回复使用道具举报显身卡