利用ARX编写平行线作填充

mini

我想编写一个程序可以在一平面内自动生成几条平行线。
      下面的程序获取两点画出一直线  
  if((retval=acedGetPoint(Null,"select left"pt1))!=RTNOTM)
  throw retval
  if((retval=acedGetPoint(pt1,"select left"pt2))!=RTNOTM)
  throw retval
   


AcdbLine*pLine =new AcDbLine(asPnt3d(pt1),asPnt3d(pt2));

   该程序在老虎工作室的用OBJECTARX开发AutoCAD2000应用程序第57页。
   我希望点取两点后可以画4条平行线，间距任定，同时线长变短。

leeyeafu

可以用offset方法，也可以重新计算线的端点

mini

OFFSET 的作用是平移，间距可调，但长度不变。如果要改变长度，怎么办？
另整个OFFSET的函数表达式是什么？有无实例？
重新计算端点，有无实例？
   具体一点： 画一根10CM的线，在间距它2CM处画另一根9CM的平行线（前面少1CM，后面不动），依次画5根这样的平行线。利用ARX编程表达。