关于xplode分解的一个奇怪问题
本帖最后由 nyistjz 于 2023-8-15 13:27 编辑请教朋友们一个问题,关于xplode这个命令,有请朋友写了如下的一个程序。
有没有办法修改成command的方法?
(defun c:t1(/ n ss str)
(setq ss (ssget '((0 . "insert"))))
(sssetfirst ss ss)
(setq str (strcat "xplode" (if (> (sslength ss) 1) " g" "") " i "))
(vla-sendcommand *doc* str)
)
用这个办法分解的图块,线条图层会继承当前状态。
分解函数QAFLAGS是个未公布的变量。如果QAFLAGS=0,那么用LISP执行(command "explode" ss "")的时候仅仅能炸开选择集的第一个实体;如果QAFLAGS=1,可以炸开选择集所有实体。也会导致复制出问题 本帖最后由 1028695446 于 2023-8-15 16:06 编辑
command不支持xplode这个命令
页:
[1]