CAD块炸不开？多重块是什么东西！

JWEI CAD 1.91k 推广

遇到一份CAD图纸，整份图纸都是一个块，进入块之后还是块，感觉就像是无限套娃直接使用炸开时，无法选中对象，也无法炸开（直接使用“X”炸开时）使用“Ctrl+1”查看后，提示是个“多重插入块”；复制下面代码，新建一个文本文档，之后将文档后缀改...

资源下载

下载价格2积分，VIP免费，请先

资料文件通过网盘下载，如遇下载链接失效，请联系我们...

遇到一份CAD图纸，整份图纸都是一个块，进入块之后还是块，感觉就像是无限套娃

直接使用炸开时，无法选中对象，也无法炸开

（直接使用“X”炸开时）

使用“Ctrl+1”查看后，提示是个“多重插入块”；

复制下面代码，新建一个文本文档，之后将文档后缀改为“lsp”；

(defun c:unlk (/ en ent)
(setq en (entsel "\n请选择图形:"))
(if en
(if (= (cdr (assoc 0 (setq ent (cdr (entget (setq en (car en)))))))
"INSERT"
)
(progn
(setq ent (entmakex
(list '(0 . "INSERT")
(assoc 2 ent)
(assoc 10 ent)
)
)
)
(command "_.explode" (entlast))
(entdel en)
)
)
)
(princ "\nOK")
(princ)
)

直接将新建的lsp文件，拖入CAD绘图窗口加载；