hosyn 发表于 2022-7-6 06:00:23

我怎样才能炸开所有的方块

如何使用lisp文件分解图形中的所有块？？

GP_ 发表于 2022-7-6 06:41:48

尝试
 

(defun c:TesT ( / qaf a)
   (setq qaf (getvar 'qaflags))
   (setvar 'qaflags 1)
   (setq a (ssget "_X" '((0 . "INSERT"))))
   (command "_explode" a "")
   (setvar 'qaflags qaf)
   (princ)
)
 
 
另请参见此处：http://www.cadtutor.net/forum/showthread.php?77625-分解所有块

Tharwat 发表于 2022-7-6 07:27:53

GP，您可能需要从选择集中排除外部参照块，此外，如果您添加if函数以保证
变量a最终不等于零，这很好
页: [1]
查看完整版本: 我怎样才能炸开所有的方块