求助：这样的MLINE如何实现？

xd-xdcad

我经常绘制三条线，中间为中心线，我原先的方法为：先绘制中心线，然后采用偏移命令，最后更改线型、图层信息，并完成绘制
若采用MLINE绘制，三条线的图层不能设置，且炸开后为单直线LINE
我的想法是：
1、按附图设置MLINE格式，三条线能对应不同的图层及线型
2、炸开后，变为3条PLINE,而不是分散的直线
若有其他的方法同时绘制3条线也可以，谢谢

Gu_xl

你常用的方法就很好，何必用别的方法！

xd-xdcad

总是想找到更好的方法，简化工作流程

LLXXZZ

用程序是可以实现你的功能,自己写个吧.都  金牌会员 了.

xd-xdcad

呵呵，术业有专攻，会用LSP已经是很大的进步了

xd-xdcad

2. (defun c:x2 (/ ss vss dist)     (vl-load-com)
   
3.    (princ "\n单线变双v.1.1-------by 无痕.2004.2\n选择要变双的曲线:")
   
4.    (setq ss (ssget   '((0 . "Arc,Circle,Ellipse,Line,LwPolyline,Polyline,Spline,XLine")) )
   
5.   vss (vla-get-activeselectionset (vla-get-activedocument (vlax-get-acad-object)))
   
6.                dist (getdist "\n输入偏移距离:"))
   
7.    (vlax-for obj vss (vla-offset obj dist)(vla-offset obj (- 0 dist)))
   
8. )

(defun c:x2 (/ ss vss dist)     (vl-load-com)<br />    (princ "\n单线变双v.1.1-------by 无痕.2004.2\n选择要变双的曲线:")<br />    (setq ss (ssget   '((0 . "Arc,Circle,Ellipse,Line,LwPolyline,Polyline,Spline,XLine")) )<br />   vss (vla-get-activeselectionset (vla-get-activedocument (vlax-get-acad-object)))<br />                dist (getdist "\n输入偏移距离:"))<br />    (vlax-for obj vss (vla-offset obj dist)(vla-offset obj (- 0 dist)))<br /> )

找到了这个，但仅实现的一部分，谁能帮助增加完善一下呢，谢谢
要求：1、中心线为图层1，线型为center2，其余随层
2、两侧偏移的线段为图层2，一侧线型等随层，另一侧线型为center，其余随层

mmmmmm

如果线间距一直保持一致，不如直接做个带拉伸的动态块，直接拽就行了，当然转折处得手动炸开后处理。