CAD.NET API一日一练（1）简单模拟PL命令了解用户交互

mrhvslisp

1. 
   
2. using System;
   
3. using System.Collections.Generic;
   
4. using System.Linq;
   
5. using System.Text;
   
6. using Autodesk.AutoCAD.Runtime;
   
7. using Autodesk.AutoCAD.ApplicationServices;
   
8. using Autodesk.AutoCAD.DatabaseServices;
   
9. using Autodesk.AutoCAD.Geometry;
   
10. using Autodesk.AutoCAD.EditorInput;
    
11. 
    
12. namespace Base
    
13. {
    
14.     public class Class1
    
15.     {
    
16.         //模拟CAD的PL命令
    
17.         # region mpolyline命令  
    
18.         [CommandMethod("mpolyline")]   
    
19.         public static void MyPolyline()
    
20.         {
    
21.             Document doc = Application.DocumentManager.MdiActiveDocument;
    
22.             Database db = doc.Database;
    
23.             Editor ed = doc.Editor;
    
24.             
    
25.             using(Transaction trans=db.TransactionManager.StartTransaction())
    
26.             {
    
27.                 BlockTable bt = (BlockTable)trans.GetObject(db.BlockTableId, OpenMode.ForRead);
    
28.                 BlockTableRecord btr = (BlockTableRecord)trans.GetObject(bt[BlockTableRecord.ModelSpace],OpenMode.ForWrite);
    
29.                 Polyline pl1 = new Polyline();
    
30.                 btr.AppendEntity(pl1);
    
31.                 trans.AddNewlyCreatedDBObject(pl1, true);
    
32.                 Point2d ptvetex;
    
33.                 List<Point2d> ptlist = new List<Point2d>();
    
34.                 PromptPointOptions ptoptions = new PromptPointOptions("");
    
35.                 ptoptions.Message = "\n请选择起点：";
    
36.                 ptoptions.AllowNone = true;
    
37.                 ptoptions.AllowArbitraryInput = false;
    
38.                 PromptPointResult result = ed.GetPoint(ptoptions);
    
39.                
    
40.                 int i=0;
    
41.                 while (result.Status == PromptStatus.OK | result.Status == PromptStatus.Keyword)
    
42.                 {
    
43.                     if (result.Status == PromptStatus.OK)
    
44.                     {
    
45.                         ptvetex = new Point2d(result.Value.X, result.Value.Y);
    
46.                         pl1.AddVertexAt(i, ptvetex, 0, 0, 0);
    
47.                         ptlist.Add(ptvetex);
    
48.                         pl1.Draw();
    
49.                         i = i + 1;
    
50.                         ptoptions.Message = "\n请选择下一点[(W)设置线宽/（C）设置颜色/回车退出：]";
    
51.                         ptoptions.UseBasePoint = true;
    
52.                         ptoptions.BasePoint = result.Value;
    
53.                         ptoptions.Keywords.Add("C");
    
54.                         ptoptions.Keywords.Add("W");
    
55.                         result = ed.GetPoint(ptoptions);
    
56.                        
    
57.                     }
    
58.                     if (result.Status == PromptStatus.Keyword)
    
59.                     {
    
60.                         if (result.StringResult == "W")
    
61.                         {
    
62.                             pl1.LineWeight = LineWeight.LineWeight040;
    
63.                         }
    
64.                         else
    
65.                         {
    
66.                             pl1.ColorIndex = 2;
    
67.                         }
    
68.                         pl1.Draw();
    
69.                         ptoptions.Message = "\n请选择下一点[(W)设置线宽/（C）设置颜色/回车退出：]";
    
70.                         ptoptions.AllowNone = true;
    
71.                         ptoptions.AllowArbitraryInput = false;
    
72.                         ptoptions.UseBasePoint = true;
    
73.                         ptoptions.BasePoint = new Point3d(ptlist[i-1].X, ptlist[i-1].Y, 0);
    
74.                         ptoptions.Keywords.Add("C");
    
75.                         ptoptions.Keywords.Add("W");
    
76.                         result = ed.GetPoint(ptoptions);
    
77.                         
    
78.                         
    
79.                     }
    
80.                 }
    
81.                 trans.Commit();
    
82.             }
    
83.         }// end MyPolyline
    
84.         # endregion
    
85.     }
    
86. }
    
87. 
    

<br /> using System;<br /> using System.Collections.Generic;<br /> using System.Linq;<br /> using System.Text;<br /> using Autodesk.<a href="http://bbs.mjtd.com/forum-41-1.html" target="_blank" class="relatedlink">AutoCAD</a>.Runtime;<br /> using Autodesk.AutoCAD.ApplicationServices;<br /> using Autodesk.AutoCAD.DatabaseServices;<br /> using Autodesk.AutoCAD.Geometry;<br /> using Autodesk.AutoCAD.EditorInput;<br /> <br /> namespace Base<br /> {<br />     public class Class1<br />     {<br />         //模拟CAD的PL命令<br />         # region mpolyline命令  <br />         [CommandMethod("mpolyline")]   <br />         public static void MyPolyline()<br />         {<br />             Document doc = Application.DocumentManager.MdiActiveDocument;<br />             Database db = doc.Database;<br />             Editor ed = doc.Editor;<br />             <br />             using(Transaction trans=db.TransactionManager.StartTransaction())<br />             {<br />                 BlockTable bt = (BlockTable)trans.GetObject(db.BlockTableId, OpenMode.ForRead);<br />                 BlockTableRecord btr = (BlockTableRecord)trans.GetObject(bt[BlockTableRecord.ModelSpace],OpenMode.ForWrite);<br />                 Polyline pl1 = new Polyline();<br />                 btr.AppendEntity(pl1);<br />                 trans.AddNewlyCreatedDBObject(pl1, true);<br />                 Point2d ptvetex;<br />                 List<Point2d> ptlist = new List<Point2d>();<br />                 PromptPointOptions ptoptions = new PromptPointOptions("");<br />                 ptoptions.Message = "\n请选择起点：";<br />                 ptoptions.AllowNone = true;<br />                 ptoptions.AllowArbitraryInput = false;<br />                 PromptPointResult result = ed.GetPoint(ptoptions);<br />                <br />                 int i=0;<br />                 while (result.Status == PromptStatus.OK | result.Status == PromptStatus.Keyword)<br />                 {<br />                     if (result.Status == PromptStatus.OK)<br />                     {<br />                         ptvetex = new Point2d(result.Value.X, result.Value.Y);<br />                         pl1.AddVertexAt(i, ptvetex, 0, 0, 0);<br />                         ptlist.Add(ptvetex);<br />                         pl1.Draw();<br />                         i = i + 1;<br />                         ptoptions.Message = "\n请选择下一点[(W)设置线宽/（C）设置颜色/回车退出：]";<br />                         ptoptions.UseBasePoint = true;<br />                         ptoptions.BasePoint = result.Value;<br />                         ptoptions.Keywords.Add("C");<br />                         ptoptions.Keywords.Add("W");<br />                         result = ed.GetPoint(ptoptions);<br />                        <br />                     }<br />                     if (result.Status == PromptStatus.Keyword)<br />                     {<br />                         if (result.StringResult == "W")<br />                         {<br />                             pl1.LineWeight = LineWeight.LineWeight040;<br />                         }<br />                         else<br />                         {<br />                             pl1.ColorIndex = 2;<br />                         }<br />                         pl1.Draw();<br />                         ptoptions.Message = "\n请选择下一点[(W)设置线宽/（C）设置颜色/回车退出：]";<br />                         ptoptions.AllowNone = true;<br />                         ptoptions.AllowArbitraryInput = false;<br />                         ptoptions.UseBasePoint = true;<br />                         ptoptions.BasePoint = new Point3d(ptlist[i-1].X, ptlist[i-1].Y, 0);<br />                         ptoptions.Keywords.Add("C");<br />                         ptoptions.Keywords.Add("W");<br />                         result = ed.GetPoint(ptoptions);<br />                         <br />                         <br />                     }<br />                 }<br />                 trans.Commit();<br />             }<br />         }// end MyPolyline<br />         # endregion<br />     }<br /> }<br /> <br />