如何加一炸开语句？

xiao88gang

这是一个实体外加外框的插件，我想把添加的外框炸开，如何加一语句。哪位高手帮忙加一下。谢谢.
  (defun c:vv ()
   (xdrx_prompt "\n选取生成外框的实体<退出>:")
  (if (setq ss (ssget))
    (progn
(if (not (setq dis (getreal "\n输入板边30<0>:")))
    (setq dis 30)
  )
      (setq box (xdrx_entity_box ss))
      (if (> dis 0)
        (setq box (xdrx_points_offset (abs dis) (xd::pnts:close box)))
      )
      (xdrx_polyline_make box t)
    )
  )
  (princ)
)

wkq004

将(xdrx_polyline_make box t)换成下句,试试
(command ".explode" (xdrx_polyline_make box t) "" "")

xiao88gang

wkq004 发表于 2016-10-22 17:26
将(xdrx_polyline_make box t)换成下句,试试
(command ".explode" (xdrx_polyline_make box t) "" "")

非常感谢你的热心帮助，可以达到想要的效果。谢谢

xiao88gang

请问一下，如果我想把它放到"BORDERLINE"
这个图层，并将颜色改为粉红色，要怎么改 一下？