像这种文件怎么一次性全部炸开，要按多次ⅹ才能全部炸开，麻烦了

夏生生

277283904 发表于 2024-3-19 09:59
我知道了，我用的是之前坛友给的炸开后还能保持选择状态的一段代码，
这段代码炸开后还能保持选择状态， ...

还是autocad基本功的问题

1. (defun c:test (/ ss old)
   
2.     (setq old (getvar "qaflags"))
   
3.     (setvar "qaflags" 1)
   
4.     (setq ss (ssget))
   
5.     (command "explode" ss "")
   
6.     (setq ss (ssget "p"))
   
7.     (sssetfirst ss ss)
   
8.     (setvar "qaflags" old)
   
9.     (princ))

(defun c:test (/ ss old)<br />     (setq old (getvar "qaflags"))<br />     (setvar "qaflags" 1)<br />     (setq ss (ssget))<br />     (command "explode" ss "")<br />     (setq ss (ssget "p"))<br />     (sssetfirst ss ss)<br />     (setvar "qaflags" old)<br />     (princ))

277283904

夏生生 发表于 2024-3-19 10:14
还是autocad基本功的问题

谢谢！

qazxswk

百度一下系统变量qaflags的功能与参数意义。