lz123456 发表于 2011-7-18 02:15:09

怎样重复运行分解选择的图块

今天接个图，遭用无名块原位置插入了几十次，怎样一次分解到位。或者指定那分解次数

Andyhon 发表于 2011-7-18 08:02:14

Ref link:
http://bbs.mjtd.com/thread-59662-1-1.html

lz123456 发表于 2011-7-18 08:21:45

长老，那程序不得行。

lz123456 发表于 2011-7-18 08:24:57

那块不是多重块，就是同一位置插入了几十个嵌套无名块，用分解可以炸开，只是要分解那同一选择的几十次

Andyhon 发表于 2011-7-18 08:28:42

请上传您的样本文件(*.Dwg)

lz123456 发表于 2011-7-18 08:52:55

那图的一部分搞的无名块

Andyhon 发表于 2011-7-18 09:09:22

Try this
;xex = 炸开嵌套块.-----by 无痕.2004.4
(defun c:xex ()
   (princ "\n炸开嵌套块.--------------by 无痕.2004.4")
   (setvar "qaflags" 1)
   (setq ss (ssget '((0 . "INSERT"))))
   (while (setq ss (ssget "P" '((0 . "INSERT"))))
   (command ".explode" ss "")
   )
   (princ)
)

lz123456 发表于 2011-7-18 09:16:13

炸开是行了，但是有点小问题，就是那门窗及那轴线号也遭炸开了，

Andyhon 发表于 2011-7-18 09:26:49

加入判断式排除 [门窗及那轴线号]

lz123456 发表于 2011-7-18 09:32:21

怎样加那判断
页: [1] 2
查看完整版本: 怎样重复运行分解选择的图块