command语句中如何增加判断语句?
我想删除图层AAA中所有的物体,但是需要判断AAA中有物体,正常是(if(ssget "X" '((8 . "AAAl")))
(command "erase"(ssget "X" '((8 . "AAAl")))"")
)
请问能不能把这个if语句整合到 command语句中?谢谢。 感觉是欧阳峰倒着练功 (if (setq ss (ssget "x" '((8 . "AAA"))))(vl-cmdf "erase" ss ""))
同樣的事不要做二次 本帖最后由 caoyin 于 2014-5-14 00:29 编辑
(if(ssget "x" '((8 . "AAA")))
(command "_.erase" "_P" "")
)
一定要整合
(command "_.erase"
(if (ssget "x" '((8 . "AAA")))
"_P"
(ssadd)
)
""
)
caoyin 发表于 2014-5-13 23:52 static/image/common/back.gif
(if(ssget "x" '((8 . "AAA")))
(command "_.erase" "_P" "")
)
如果ssget返回nil,那么后果的回车就有问题,会重复上一个命令,所以还是要增加一个判断语句
页:
[1]