CAD块参照转实体

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

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

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

CAD块参照转实体_第1张图片

  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. )

你可能感兴趣的:(ca)