[表格] 数据写入autoCAD

admin

[表格] 数据写入autoCAD

1. using Autodesk.AutoCAD.ApplicationServices;
2. using Autodesk.AutoCAD.DatabaseServices;
3. using Autodesk.AutoCAD.EditorInput;
4. using Autodesk.AutoCAD.Geometry;
5. using Autodesk.AutoCAD.Runtime;
6. namespace TableCreation
7. {
8.   public class Commands
9.   {
10.     [CommandMethod("CRT")]
11.     static public void CreateTable()
12.     {
13.       Document doc =
14.         Application.DocumentManager.MdiActiveDocument;
15.       Database db = doc.Database;
16.       Editor ed = doc.Editor;
17.       PromptPointResult pr =
18.         ed.GetPoint("\nEnter table insertion point: ");
19.       if (pr.Status == PromptStatus.OK)
20.       {
21.         Table tb = new Table();
22.         tb.TableStyle = db.Tablestyle;
23.         tb.NumRows = 5;
24.         tb.NumColumns = 3;
25.         tb.SetRowHeight(3);
26.         tb.SetColumnWidth(15);
27.         tb.Position = pr.Value;
28.         // Create a 2-dimensional array
29.         // of our table contents
30.         string[,] str = new string[5, 3];
31.         str[0, 0] = "Part No.";
32.         str[0, 1] = "Name ";
33.         str[0, 2] = "Material ";
34.         str[1, 0] = "1876-1";
35.         str[1, 1] = "Flange";
36.         str[1, 2] = "Perspex";
37.         str[2, 0] = "0985-4";
38.         str[2, 1] = "Bolt";
39.         str[2, 2] = "Steel";
40.         str[3, 0] = "3476-K";
41.         str[3, 1] = "Tile";
42.         str[3, 2] = "Ceramic";
43.         str[4, 0] = "8734-3";
44.         str[4, 1] = "Kean";
45.         str[4, 2] = "Mostly water";
46.         // Use a nested loop to add and format each cell
47.         for (int i = 0; i < 5; i++)
48.         {
49.           for (int j = 0; j < 3; j++)
50.           {
51.             tb.SetTextHeight(i, j, 1);
52.             tb.SetTextString(i, j, str[i, j]);
53.             tb.SetAlignment(i, j, CellAlignment.MiddleCenter);
54.           }
55.         }
56.         tb.GenerateLayout();
57.         Transaction tr =
58.           doc.TransactionManager.StartTransaction();
59.         using (tr)
60.         {
61.           BlockTable bt =
62.             (BlockTable)tr.GetObject(
63.               doc.Database.BlockTableId,
64.               OpenMode.ForRead
65.             );
66.           BlockTableRecord btr =
67.             (BlockTableRecord)tr.GetObject(
68.               bt[BlockTableRecord.ModelSpace],
69.               OpenMode.ForWrite
70.             );
71.           btr.AppendEntity(tb);
72.           tr.AddNewlyCreatedDBObject(tb, true);
73.           tr.Commit();
74.         }
75.       }
76.     }
77.   }
78. }

复制代码