如何加一炸开语句?
这是一个实体外加外框的插件,我想把添加的外框炸开,如何加一语句。哪位高手帮忙加一下。谢谢.(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)
)
将(xdrx_polyline_make box t)换成下句,试试
(command ".explode" (xdrx_polyline_make box t) "" "") wkq004 发表于 2016-10-22 17:26
将(xdrx_polyline_make box t)换成下句,试试
(command ".explode" (xdrx_polyline_make box t) "" "")
非常感谢你的热心帮助,可以达到想要的效果。谢谢 请问一下,如果我想把它放到"BORDERLINE"
这个图层,并将颜色改为粉红色,要怎么改 一下?
页:
[1]