知道线的起点，长度，与x轴的夹角，如何使用程序编程画线？

asd106

知道，线的起点，线的长度，线与x轴的夹角，
请问，如何使用程序编程画线？

epwt

1. [CommandMethod("DrawLineTest")]
   
2.   public void DrawLineTest()
   
3.   {
   
4.    double angle = Math.PI / 4;//与X轴夹角
   
5.    Point3d startPoint = new Point3d(0,0,0);//起点
   
6.    double lineLength = 50;//线的长度
   
7.    Vector3d vector = new Vector3d(1, 0, 0);//x轴方向向量
   
8.    Point3d endPoint = startPoint + (vector.GetNormal().RotateBy(angle,Vector3d.ZAxis)) * lineLength;
   
9.    //把x轴向量转到指定角度就可以了
   
10. 
    
11.    Line line = new Line(startPoint, endPoint);
    
12.    AddEntity(line);
    
13.   }
    
14. 
    
15. public void AddEntity(Entity entity)
    
16.   {
    
17.    Document doc = AcadApp.DocumentManager.MdiActiveDocument;
    
18.    Database db = doc.Database;
    
19.    using (Transaction trans = db.TransactionManager.StartTransaction()) {
    
20.     BlockTable bt = (trans.GetObject(db.BlockTableId, OpenMode.ForWrite)) as BlockTable;
    
21.     BlockTableRecord btr = (trans.GetObject(bt[BlockTableRecord.ModelSpace], OpenMode.ForWrite)) as BlockTableRecord;
    
22.    
    
23.     ObjectId objectId = btr.AppendEntity(entity);
    
24.     trans.AddNewlyCreatedDBObject(entity, true);
    
25.     trans.Commit();
    
26.     trans.Dispose();
    
27.    }
    
28.   }
    

[CommandMethod("DrawLineTest")]<br />   public void DrawLineTest()<br />   {<br />    double angle = Math.PI / 4;//与X轴夹角<br />    Point3d startPoint = new Point3d(0,0,0);//起点<br />    double lineLength = 50;//线的长度<br />    Vector3d vector = new Vector3d(1, 0, 0);//x轴方向向量<br />    Point3d endPoint = startPoint + (vector.GetNormal().RotateBy(angle,Vector3d.ZAxis)) * lineLength;<br />    //把x轴向量转到指定角度就可以了 <br /> <br />    Line line = new Line(startPoint, endPoint);<br />    AddEntity(line);<br />   }<br /> <br /> public void AddEntity(Entity entity)<br />   {<br />    Document doc = AcadApp.DocumentManager.MdiActiveDocument;<br />    Database db = doc.Database;<br />    using (Transaction trans = db.TransactionManager.StartTransaction()) {<br />     BlockTable bt = (trans.GetObject(db.BlockTableId, OpenMode.ForWrite)) as BlockTable;<br />     BlockTableRecord btr = (trans.GetObject(bt[BlockTableRecord.ModelSpace], OpenMode.ForWrite)) as BlockTableRecord;<br />    <br />     ObjectId objectId = btr.AppendEntity(entity);<br />     trans.AddNewlyCreatedDBObject(entity, true);<br />     trans.Commit();<br />     trans.Dispose();<br />    }<br />   }<br />

希望会对你有用。

zlg258369

2. (defun c:hx()
   
3.   (setq jd (getreal "\n角度:"))
   
4.   (setq cd (getreal "\n长度:"))
   
5.   (setq p1 (getpoint "\n起点:"))
   
6.   (setq p2 (* (cos (* pi (/ jd 180))) cd))
   
7.   (setq p3 (* (sin (* pi (/ jd 180))) cd))
   
8.   (setq p2 (+ (car p1) p2))
   
9.   (setq p3 (+ (cadr p1) p3))
   
10.     (command "line" p1 (list p2 p3) "")
    
11.     (princ)
    
12.   )

(defun c:hx()<br />   (setq jd (getreal "\n角度:"))<br />   (setq cd (getreal "\n长度:"))<br />   (setq p1 (getpoint "\n起点:"))<br />   (setq p2 (* (cos (* pi (/ jd 180))) cd))<br />   (setq p3 (* (sin (* pi (/ jd 180))) cd))<br />   (setq p2 (+ (car p1) p2))<br />   (setq p3 (+ (cadr p1) p3))<br />     (command "line" p1 (list p2 p3) "")<br />     (princ)<br />   )

cdinten

知道起点，长度和角度
则终点是
Point3d endPoint =new Point3d(startPoint.X+Length*Math.Cos(theta),startPoint.Y+Length*Math.Sin(theta),0)
然后绘制直线
Line line = new Line(startPoint, endPoint);
然后就很简单了