CAD块参照转实体

经常，需要在CAD中插入块，比如图框，它的类型是INSERT，而不是Line和PolyLine。一般情况下，我们是不会去编辑它的，但有的时候需要选择它，比如在选择打印范围时，默认为过滤掉INSERT类型（其实这是不合理的，考虑不周全的），所以现在要将块转为实体。

直接使用CAD分解（EXPLODE）命令即可。它会把块直接分成四条线（Line）。

但这里有成百上千幅dwg图都要做这样的处理，那当然只有使用指处理工具。关于图中这个批量处理工具，后面我会专门来分享。

1. (Defun c:Test ()
2. ??;;选择TK图层的块（INSERT）
3. ??(setq ss (ssget "x" (list (cons 0 "INSERT") (cons 8 "TK"))));
4. ??;;分解
5. ??(command "EXPLODE" ss "")
6. ??(princ);
7. ??(princ "处理完毕，请检查核实！");
8. )

CAD块参照转实体

原文：http://www.cnblogs.com/liweis/p/4161263.html