帮改一下，图层命令

hrer · 发表于 2011-12-4 17:35:38

删除指定图层上的所有元素实体

(command "erase" (ssget "x") "")
这个命令好使

可以指定图层后，就出现错误，麻烦帮改一下，初学！
(command "erase" (ssget "x" (8 . "ss")) "")
; 错误: 参数类型错误: consp "ss"

chg · 发表于 2011-12-4 17:57:57

(command "erase" (ssget "x" '(8 . "ss")) "")

hrer · 发表于 2011-12-4 18:07:08

按照LS的代码显示
;错误：错误的点参数
选择对象

还是不能输入命令后删除该层的实体

lenlenq · 发表于 2011-12-4 18:13:32

(command "erase" (ssget "x" (8 . "ss")) "")
----->>>(command "erase" (ssget "x" '((8 . "ss"))) "")

chg · 发表于 2011-12-4 18:16:06

(command "erase" (ssget "x" '((8 . "ss"))) "")

Student · 发表于 2011-12-4 18:17:15

在理想情况下，
(command "erase" (ssget "x" '(8 . "ss")) "")
改成
(command "erase" (ssget "x" '((8 . "ss"))) "")
就可以了。
但是，若不存在ss层，或ss层没有可删除图元，就会出错。
建议改为：
(if(setq sel(ssget "x" '((8 . "ss"))))
(command "erase" sel "")
)

hrer · 发表于 2011-12-4 18:17:32

非常感谢，好使了。看来得学点基本功了。
格式看不懂啊，少着少那的。

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