练习 读取文件绘制三角网

csharp

源帖 http://bbs.xdcad.net/thread-674146-1-1.html

2. 
   
3. // (C) Copyright 2014 by  
   
4. 
   
5. using System;
   
6. using System.Diagnostics;
   
7. using System.IO;
   
8. using Autodesk.AutoCAD.Runtime;
   
9. using Autodesk.AutoCAD.ApplicationServices;
   
10. using Autodesk.AutoCAD.DatabaseServices;
    
11. using Autodesk.AutoCAD.Geometry;
    
12. using Autodesk.AutoCAD.EditorInput;
    
13. using Exception = System.Exception;
    
14. 
    
15. 
    
16. [assembly: CommandClass(typeof(AutoCAD_CSharp_plug_in14.MyCommands))]
    
17. 
    
18. namespace AutoCAD_CSharp_plug_in14
    
19. {
    
20.     public class MyCommands
    
21.     {
    
22.         [CommandMethod("MyGroup", "MyCommand", "MyCommandLocal", CommandFlags.Modal)]
    
23.         public void MyCommand() // This method can have any name
    
24.         {
    
25.             Document doc = Application.DocumentManager.MdiActiveDocument;
    
26.             Editor ed = doc.Editor;
    
27.             Database db = doc.Database;
    
28.             Transaction tr = db.TransactionManager.StartTransaction();
    
29. 
    
30.             PromptOpenFileOptions  pfo = new PromptOpenFileOptions("选择坐标文件");
    
31. 
    
32.             pfo.DialogCaption = "选择坐标文件";
    
33.             pfo.Filter = "Txt Flie (*.txt)|*.txt";
    
34. 
    
35.             PromptFileNameResult fr = ed.GetFileNameForOpen(pfo);
    
36.             if (fr.Status != PromptStatus.OK)
    
37.             {
    
38.                 return;
    
39.             }
    
40.             string coordFile = fr.StringResult;
    
41.             pfo.DialogCaption = "选择三角网文件";
    
42.             PromptFileNameResult tfr = ed.GetFileNameForOpen(pfo);
    
43.             if (tfr.Status != PromptStatus.OK)
    
44.             {
    
45.                 return;
    
46.             }
    
47.             string sjwFile = tfr.StringResult;
    
48.             Stopwatch watch = new Stopwatch();
    
49.             watch.Restart();
    
50.             ed.WriteMessage("\n请稍候.... 文件处理中！");
    
51.             var coords = CoordFromFile(coordFile , true) as Point3d [];
    
52.             var indexs = CoordFromFile(sjwFile,false ) as int [];
    
53.             watch.Stop();
    
54.             ed.WriteMessage("\n文件读取完毕. 用时 = {0}s", watch.Elapsed.TotalSeconds.ToString());
    
55.             //ed.WriteMessage("\n开始绘制三角网,请稍候.....");
    
56.             ProgressMeter pm = new ProgressMeter();
    
57.             pm.Start("开始绘制三角网");
    
58.             pm.SetLimit(indexs.Length/3);
    
59.             watch.Restart();
    
60.             using (tr)
    
61.             {
    
62.                 try
    
63.                 {
    
64.                     //Extents3d ext = new Extents3d();
    
65.                     BlockTableRecord btr = (BlockTableRecord) tr.GetObject(db.CurrentSpaceId, OpenMode.ForWrite);
    
66.                     for (int i = 0; i < indexs .Length -1; i = i + 3)
    
67.                     {
    
68.                         int n = indexs[i];
    
69.                         int nn = indexs[i + 1];
    
70.                         int nnn = indexs[i + 2];
    
71. 
    
72.                         Point3dCollection npts = new Point3dCollection();
    
73.                         npts.Add(coords[n - 1]);
    
74.                         npts.Add(coords[nn - 1]);
    
75.                         npts.Add(coords[nnn - 1]);
    
76. 
    
77.                         Curve poly3d = new Polyline3d(Poly3dType.SimplePoly,npts,true);
    
78.                         
    
79. 
    
80.                         btr.AppendEntity((Entity )poly3d);
    
81.                         tr.AddNewlyCreatedDBObject(poly3d, true);
    
82.                         //ext.AddExtents((Entity) poly3d.GeometricExtents);
    
83.                         pm.MeterProgress();
    
84. 
    
85.                     }
    
86.                     tr.Commit();
    
87.                     pm.Stop();
    
88.                     watch.Stop();
    
89.                     ed.WriteMessage("\n绘制用时 = {0}", watch.Elapsed.TotalSeconds.ToString());
    
90.                     ed.WriteMessage("\n绘制完成, 共 {0} 个三角形", Convert .ToString(indexs.Length  / 3));
    
91.                     //View
    
92.                 }
    
93.                 catch (Exception)
    
94.                 {
    
95.                     throw;
    
96.                 }
    
97.             }
    
98. 
    
99.         }
    
100. 
     
101.         private Object  CoordFromFile(string pathFile , bool mod)
     
102.         {
     
103.             string content = File.ReadAllText(@pathFile );
     
104.             string[] values = content.Replace("\r\n", "\r").Split('\r');
     
105.             string[] splitstring = new string[1] { ' '.ToString() };
     
106.             if (mod)
     
107.             {
     
108.                 Point3d[] pts = new Point3d[values.Length - 1];
     
109. 
     
110.                 for (int i = 0; i < values.Length; i++)
     
111.                 {
     
112.                     string str = values[i];
     
113.                     if (str != "")
     
114.                     {
     
115.                         string[] nstr = str.Split(splitstring, StringSplitOptions.RemoveEmptyEntries);
     
116. 
     
117.                         Point3d pt = new Point3d(Convert.ToDouble(nstr[0]), Convert.ToDouble(nstr[1]), Convert.ToDouble(nstr[2]));
     
118.                         pts[i] = pt;
     
119.                     }
     
120. 
     
121.                 }
     
122.                 return pts;
     
123.             }
     
124.             else
     
125.             {
     
126.                 int nl = values.Length - 1;
     
127.                 int[] nlist = new int[nl*3];
     
128.                 int j = 0;
     
129.                 for (int i = 0; i < nl; i++)
     
130.                 {
     
131.                     string str = values[i];
     
132.                     string[] nstr = str.Split(splitstring, StringSplitOptions.RemoveEmptyEntries);
     
133.                     nlist[j] = Convert .ToInt32(nstr[0]);
     
134.                     nlist[j + 1] = Convert.ToInt32(nstr[1]);
     
135.                     nlist[j + 2] = Convert .ToInt32(nstr[2]);
     
136.                     j = j + 3;
     
137.                 }
     
138.                 return nlist;
     
139.             }
     
140.         }
     
141.     }
     
142. 
     
143. }
     

<br /> // (C) Copyright 2014 by  <br /> <br /> using System;<br /> using System.Diagnostics;<br /> using System.IO;<br /> using Autodesk.AutoCAD.Runtime;<br /> using Autodesk.AutoCAD.ApplicationServices;<br /> using Autodesk.AutoCAD.DatabaseServices;<br /> using Autodesk.AutoCAD.Geometry;<br /> using Autodesk.AutoCAD.EditorInput;<br /> using Exception = System.Exception;<br /> <br /> <br /> [assembly: CommandClass(typeof(AutoCAD_CSharp_plug_in14.MyCommands))]<br /> <br /> namespace AutoCAD_CSharp_plug_in14<br /> {<br />     public class MyCommands<br />     {<br />         [CommandMethod("MyGroup", "MyCommand", "MyCommandLocal", CommandFlags.Modal)]<br />         public void MyCommand() // This method can have any name<br />         {<br />             Document doc = Application.DocumentManager.MdiActiveDocument;<br />             Editor ed = doc.Editor;<br />             Database db = doc.Database;<br />             Transaction tr = db.TransactionManager.StartTransaction();<br /> <br />             PromptOpenFileOptions  pfo = new PromptOpenFileOptions("选择坐标文件");<br /> <br />             pfo.DialogCaption = "选择坐标文件";<br />             pfo.Filter = "Txt Flie (*.txt)|*.txt";<br /> <br />             PromptFileNameResult fr = ed.GetFileNameForOpen(pfo);<br />             if (fr.Status != PromptStatus.OK)<br />             {<br />                 return;<br />             }<br />             string coordFile = fr.StringResult;<br />             pfo.DialogCaption = "选择三角网文件";<br />             PromptFileNameResult tfr = ed.GetFileNameForOpen(pfo);<br />             if (tfr.Status != PromptStatus.OK)<br />             {<br />                 return;<br />             }<br />             string sjwFile = tfr.StringResult;<br />             Stopwatch watch = new Stopwatch();<br />             watch.Restart();<br />             ed.WriteMessage("\n请稍候.... 文件处理中！");<br />             var coords = CoordFromFile(coordFile , true) as Point3d []; <br />             var indexs = CoordFromFile(sjwFile,false ) as int [];<br />             watch.Stop();<br />             ed.WriteMessage("\n文件读取完毕. 用时 = {0}s", watch.Elapsed.TotalSeconds.ToString());<br />             //ed.WriteMessage("\n开始绘制三角网,请稍候.....");<br />             ProgressMeter pm = new ProgressMeter();<br />             pm.Start("开始绘制三角网");<br />             pm.SetLimit(indexs.Length/3);<br />             watch.Restart();<br />             using (tr)<br />             {<br />                 try<br />                 {<br />                     //Extents3d ext = new Extents3d();<br />                     BlockTableRecord btr = (BlockTableRecord) tr.GetObject(db.CurrentSpaceId, OpenMode.ForWrite);<br />                     for (int i = 0; i < indexs .Length -1; i = i + 3)<br />                     {<br />                         int n = indexs[i];<br />                         int nn = indexs[i + 1];<br />                         int nnn = indexs[i + 2];<br /> <br />                         Point3dCollection npts = new Point3dCollection();<br />                         npts.Add(coords[n - 1]);<br />                         npts.Add(coords[nn - 1]);<br />                         npts.Add(coords[nnn - 1]);<br /> <br />                         Curve poly3d = new Polyline3d(Poly3dType.SimplePoly,npts,true);<br />                         <br /> <br />                         btr.AppendEntity((Entity )poly3d);<br />                         tr.AddNewlyCreatedDBObject(poly3d, true);<br />                         //ext.AddExtents((Entity) poly3d.GeometricExtents);<br />                         pm.MeterProgress();<br /> <br />                     }<br />                     tr.Commit();<br />                     pm.Stop();<br />                     watch.Stop();<br />                     ed.WriteMessage("\n绘制用时 = {0}", watch.Elapsed.TotalSeconds.ToString());<br />                     ed.WriteMessage("\n绘制完成, 共 {0} 个三角形", Convert .ToString(indexs.Length  / 3));<br />                     //View<br />                 }<br />                 catch (Exception)<br />                 {<br />                     throw;<br />                 }<br />             }<br /> <br />         }<br /> <br />         private Object  CoordFromFile(string pathFile , bool mod)<br />         {<br />             string content = File.ReadAllText(@pathFile );<br />             string[] values = content.Replace("\r\n", "\r").Split('\r');<br />             string[] splitstring = new string[1] { ' '.ToString() };<br />             if (mod)<br />             {<br />                 Point3d[] pts = new Point3d[values.Length - 1];<br /> <br />                 for (int i = 0; i < values.Length; i++)<br />                 {<br />                     string str = values[i];<br />                     if (str != "")<br />                     {<br />                         string[] nstr = str.Split(splitstring, StringSplitOptions.RemoveEmptyEntries);<br /> <br />                         Point3d pt = new Point3d(Convert.ToDouble(nstr[0]), Convert.ToDouble(nstr[1]), Convert.ToDouble(nstr[2]));<br />                         pts[i] = pt;<br />                     }<br /> <br />                 }<br />                 return pts;<br />             }<br />             else<br />             {<br />                 int nl = values.Length - 1;<br />                 int[] nlist = new int[nl*3];<br />                 int j = 0;<br />                 for (int i = 0; i < nl; i++)<br />                 {<br />                     string str = values[i];<br />                     string[] nstr = str.Split(splitstring, StringSplitOptions.RemoveEmptyEntries);<br />                     nlist[j] = Convert .ToInt32(nstr[0]);<br />                     nlist[j + 1] = Convert.ToInt32(nstr[1]);<br />                     nlist[j + 2] = Convert .ToInt32(nstr[2]);<br />                     j = j + 3;<br />                 }<br />                 return nlist;<br />             }<br />         }<br />     }<br /> <br /> }<br />

绘制 Polyline3d 折腾了好长时间，Google搜的方法很多都不行(2014) ，最后找到现在这个 Curve 绘制

命令: NETLOAD
命令: MYCOMMAND
请稍候.... 文件处理中！
文件读取完毕. 用时 = 0.3322694s
绘制用时 = 30.0766156
绘制完成, 共 88440 个三角形

csharp

http://blog.sina.cn/dpool/blog/s/blog_49a9ee140101782f.html

http://www.acadnetwork.com/index.php?topic=269.0

csharp

翻了翻张帆才鸟所赠《AutoCAD VBA&VB.NET开发基础与实例教程》第二版，其中提到读写操作使用 OpenCloseTransaction 代替 Transaction.StartTransaction(); 用 ObjectID.Open 代替 Transaction.GetObject 在大量读写操作时效率有很大提升，把上面几句修改下，的确如此

1. 
   
2. Transaction tr = db.TransactionManager.StartTransaction();
   

复制代码

改为

1. 
   
2. OpenCloseTransaction tr  = new OpenCloseTransaction();
   

复制代码

下面一句

1. 
   
2. BlockTableRecord btr = (BlockTableRecord) tr.GetObject(db.CurrentSpaceId, OpenMode.ForWrite);
   

复制代码

改为

1. 
   
2. BlockTableRecord btr = db.CurrentSpaceId.Open(OpenMode.ForWrite) as BlockTableRecord ;
   

复制代码

修改后的效果，加入Pross Bar 会浪费几秒时间

命令: MYCOMMAND
请稍候.... 文件处理中！
文件读取完毕. 用时 = 0.3288974s
绘制用时 = 23.4897311
绘制完成, 共 88440 个三角形

中间出现了一个未加入数据库实体错误提示

skywinlake

如果是从外部程序直接控制CAD绘制图形，不采用在CAD中运行的dll，有没有高效的方法呢？ 等待释疑

麻烦看下我的贴
http://bbs.xdcad.net/forum.php?m ... page%3D1#pid3544608

dnbcgrass

谢谢csharp，你的程序已经很快了!:lol:lol
命令: MyCommand

请稍候.... 文件处理中！
文件读取完毕. 用时 = 0.3659615s
绘制用时 = 4.576217
绘制完成, 共 88440 个三角形

gdfyhao

算法还是有点复杂，没看懂，继续学习中

xdcad2019

学习!谢谢!!!!

qinyi92

多谢楼主，多多分享啊