遇到问题，请教AUTOLISP解决方案

masterlong · 发表于 2006-3-25 00:48

-layer命令

保存图层状态时

若指定名称已存在

会出现错误提示

问：如何查询某个“图层状态”是否存在

masterlong · 发表于 2006-3-25 00:56

如果不行

也许可以用以下方法曲线救国

若无错误

两次(command)完全退出-layer

若有错误

需要三次（command）

这样可以先两次(command)

再查询当前是否处于-layer命令

明天试下

若有更好更直接的办法

请不吝赐教

masterlong · 发表于 2006-3-25 00:59

不是（command）

是（command ""）

别晨 · 发表于 2006-3-25 02:09

(if (=(tblobjname "LAYER" "yourlayername") nil) ;检查图层是否存在
(progn
(entmake (list ;创建图层
'(0 . "LAYER")
'(100 . "AcDbSymbolTableRecord")
'(100 . "AcDbLayerTableRecord")
'(6 . "CONTINUOUS")
'(62 . 7)
'(70 . 0)
(cons 2 "yourlayername")
)
)
)
)

别晨 · 发表于 2006-3-25 02:09

(if (=(tblobjname "LAYER" "ch_table") nil)        ;检查图层是否存在
    (progn
        (entmake (list                        ;创建图层
                    '(0 . "LAYER")
                    '(100 . "AcDbSymbolTableRecord")
                    '(100 . "AcDbLayerTableRecord")
                    '(6 . "CONTINUOUS")
                    '(62 . 7)
                    '(70 . 0)
                    (cons 2 "ch_table")
                  )
        )
    )
)

别晨 · 发表于 2006-3-25 02:12

代码不能换行，为什么？

复制代码

jdhszh · 发表于 2006-3-25 21:33

4、5、6楼好像和楼主说的不符，图层状态，即所有图层打开或冻结的状态。

masterlong · 发表于 2006-3-28 21:49

感谢楼上两位

正如楼上所言

456楼的方法不对症啊

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