Kean专题(7)—Fields

雪山飞狐_lzh

January 15, 2009
More fun with AutoCAD tables and their styles using .NET
In this previous post we saw some code to create a table style and apply it to a new table inside an AutoCAD drawing. While responding to a comment on the post, I realised that the table didn't display properly using my example: the first column heading was being taken as the table title and the rest of the column headings were lost - the headings in the table were actually taken from the first row of data. I suppose that serves me right for having chosen such eye-catching (and distracting) colours. :-)
The following C# code addresses this by adding some information to our array of table contents, and using that for the table title. It also does a little more to customize the display of our table by applying chunky lineweights (and yet more garish colours) to the table's grid-lines.

2. using Autodesk.AutoCAD.ApplicationServices;
3. using Autodesk.AutoCAD.DatabaseServices;
4. using Autodesk.AutoCAD.EditorInput;
5. using Autodesk.AutoCAD.Runtime;
6. using Autodesk.AutoCAD.Colors;
7. namespace TableAndStyleCreation
8. {
9.   public class Commands
10.   {
11.     [CommandMethod("CTWS")]
12.     static public void CreateTableWithStyleAndWhatStyle()
13.     {
14.       Document doc =
15.         Application.DocumentManager.MdiActiveDocument;
16.       Database db = doc.Database;
17.       Editor ed = doc.Editor;
18.       PromptPointResult pr =
19.         ed.GetPoint("\nEnter table insertion point: ");
20.       if (pr.Status == PromptStatus.OK)
21.       {
22.         Transaction tr =
23.           doc.TransactionManager.StartTransaction();
24.         using (tr)
25.         {
26.           // First let us create our custom style,
27.           //  if it doesn't exist
28.           const string styleName = "Garish Table Style";
29.           ObjectId tsId = ObjectId.Null;
30.           DBDictionary sd =
31.             (DBDictionary)tr.GetObject(
32.               db.TableStyleDictionaryId,
33.               OpenMode.ForRead
34.             );
35.           // Use the style if it already exists
36.           if (sd.Contains(styleName))
37.           {
38.             tsId = sd.GetAt(styleName);
39.           }
40.           else
41.           {
42.             // Otherwise we have to create it
43.             TableStyle ts = new TableStyle();
44.             // Make the header area red
45.             ts.SetBackgroundColor(
46.               Color.FromColorIndex(ColorMethod.ByAci, 1),
47.               (int)(RowType.TitleRow |
48.                     RowType.HeaderRow)
49.             );
50.             // And the data area yellow
51.             ts.SetBackgroundColor(
52.               Color.FromColorIndex(ColorMethod.ByAci, 2),
53.               (int)RowType.DataRow
54.             );
55.             // With magenta text everywhere (yeuch :-)
56.             ts.SetColor(
57.               Color.FromColorIndex(ColorMethod.ByAci, 6),
58.               (int)(RowType.TitleRow |
59.                     RowType.HeaderRow |
60.                     RowType.DataRow)
61.             );
62.             // And now with cyan outer grid-lines
63.             ts.SetGridColor(
64.               Color.FromColorIndex(ColorMethod.ByAci, 4),
65.               (int)GridLineType.OuterGridLines,
66.               (int)(RowType.TitleRow |
67.                     RowType.HeaderRow |
68.                     RowType.DataRow)
69.             );
70.             // And bright green inner grid-lines
71.             ts.SetGridColor(
72.               Color.FromColorIndex(ColorMethod.ByAci, 3),
73.               (int)GridLineType.InnerGridLines,
74.               (int)(RowType.TitleRow |
75.                     RowType.HeaderRow |
76.                     RowType.DataRow)
77.             );
78.             // And we'll make the grid-lines nice and chunky
79.             ts.SetGridLineWeight(
80.               LineWeight.LineWeight211,
81.               (int)GridLineType.AllGridLines,
82.               (int)(RowType.TitleRow |
83.                     RowType.HeaderRow |
84.                     RowType.DataRow)
85.             );
86.             // Add our table style to the dictionary
87.             //  and to the transaction
88.             tsId = ts.PostTableStyleToDatabase(db, styleName);
89.             tr.AddNewlyCreatedDBObject(ts, true);
90.           }
91.           BlockTable bt =
92.             (BlockTable)tr.GetObject(
93.               doc.Database.BlockTableId,
94.               OpenMode.ForRead
95.             );
96.           Table tb = new Table();
97.           tb.NumRows = 6;
98.           tb.NumColumns = 3;
99.           tb.SetRowHeight(3);
100.           tb.SetColumnWidth(15);
101.           tb.Position = pr.Value;
102.           // Use our table style
103.           if (tsId == ObjectId.Null)
104.             // This should not happen, unless the
105.             //  above logic changes
106.             tb.TableStyle = db.Tablestyle;
107.           else
108.             tb.TableStyle = tsId;
109.           // Create a 2-dimensional array
110.           // of our table contents
111.           string[,] str = new string[6, 3];
112.           str[0, 0] = "Material Properties Table";
113.           str[1, 0] = "Part No.";
114.           str[1, 1] = "Name";
115.           str[1, 2] = "Material";
116.           str[2, 0] = "1876-1";
117.           str[2, 1] = "Flange";
118.           str[2, 2] = "Perspex";
119.           str[3, 0] = "0985-4";
120.           str[3, 1] = "Bolt";
121.           str[3, 2] = "Steel";
122.           str[4, 0] = "3476-K";
123.           str[4, 1] = "Tile";
124.           str[4, 2] = "Ceramic";
125.           str[5, 0] = "8734-3";
126.           str[5, 1] = "Kean";
127.           str[5, 2] = "Mostly water";
128.           // Use a nested loop to add and format each cell
129.           for (int i = 0; i < 6; i++)
130.           {
131.             if (i == 0)
132.             {
133.               // This is for the title
134.               tb.SetTextHeight(0, 0, 1);
135.               tb.SetTextString(0, 0, str[0, 0]);
136.               tb.SetAlignment(0, 0, CellAlignment.MiddleCenter);
137.             }
138.             else
139.             {
140.               // These are the header and data rows
141.               for (int j = 0; j < 3; j++)
142.               {
143.                 tb.SetTextHeight(i, j, 1);
144.                 tb.SetTextString(i, j, str[i, j]);
145.                 tb.SetAlignment(i, j, CellAlignment.MiddleCenter);
146.               }
147.             }
148.           }
149.           tb.GenerateLayout();
150.           BlockTableRecord btr =
151.             (BlockTableRecord)tr.GetObject(
152.               bt[BlockTableRecord.ModelSpace],
153.               OpenMode.ForWrite
154.             );
155.           btr.AppendEntity(tb);
156.           tr.AddNewlyCreatedDBObject(tb, true);
157.           tr.Commit();
158.         }
159.       }
160.     }
161.   }
162. }

using Autodesk.AutoCAD.ApplicationServices; using Autodesk.AutoCAD.DatabaseServices; using Autodesk.AutoCAD.EditorInput; using Autodesk.AutoCAD.Runtime; using Autodesk.AutoCAD.Colors; namespace TableAndStyleCreation {   public class Commands   {     [CommandMethod("CTWS")]     static public void CreateTableWithStyleAndWhatStyle()     {       Document doc =         Application.DocumentManager.MdiActiveDocument;       Database db = doc.Database;       Editor ed = doc.Editor;       PromptPointResult pr =         ed.GetPoint("\nEnter table insertion point: ");       if (pr.Status == PromptStatus.OK)       {         Transaction tr =           doc.TransactionManager.StartTransaction();         using (tr)         {           // First let us create our custom style,           //  if it doesn't exist           const string styleName = "Garish Table Style";           ObjectId tsId = ObjectId.Null;           DBDictionary sd =             (DBDictionary)tr.GetObject(               db.TableStyleDictionaryId,               OpenMode.ForRead             );           // Use the style if it already exists           if (sd.Contains(styleName))           {             tsId = sd.GetAt(styleName);           }           else           {             // Otherwise we have to create it             TableStyle ts = new TableStyle();             // Make the header area red             ts.SetBackgroundColor(               Color.FromColorIndex(ColorMethod.ByAci, 1),               (int)(RowType.TitleRow |                     RowType.HeaderRow)             );             // And the data area yellow             ts.SetBackgroundColor(               Color.FromColorIndex(ColorMethod.ByAci, 2),               (int)RowType.DataRow             );             // With magenta text everywhere (yeuch :-)             ts.SetColor(               Color.FromColorIndex(ColorMethod.ByAci, 6),               (int)(RowType.TitleRow |                     RowType.HeaderRow |                     RowType.DataRow)             );             // And now with cyan outer grid-lines             ts.SetGridColor(               Color.FromColorIndex(ColorMethod.ByAci, 4),               (int)GridLineType.OuterGridLines,               (int)(RowType.TitleRow |                     RowType.HeaderRow |                     RowType.DataRow)             );             // And bright green inner grid-lines             ts.SetGridColor(               Color.FromColorIndex(ColorMethod.ByAci, 3),               (int)GridLineType.InnerGridLines,               (int)(RowType.TitleRow |                     RowType.HeaderRow |                     RowType.DataRow)             );             // And we'll make the grid-lines nice and chunky             ts.SetGridLineWeight(               LineWeight.LineWeight211,               (int)GridLineType.AllGridLines,               (int)(RowType.TitleRow |                     RowType.HeaderRow |                     RowType.DataRow)             );             // Add our table style to the dictionary             //  and to the transaction             tsId = ts.PostTableStyleToDatabase(db, styleName);             tr.AddNewlyCreatedDBObject(ts, true);           }           BlockTable bt =             (BlockTable)tr.GetObject(               doc.Database.BlockTableId,               OpenMode.ForRead             );           Table tb = new Table();           tb.NumRows = 6;           tb.NumColumns = 3;           tb.SetRowHeight(3);           tb.SetColumnWidth(15);           tb.Position = pr.Value;           // Use our table style           if (tsId == ObjectId.Null)             // This should not happen, unless the             //  above logic changes             tb.TableStyle = db.Tablestyle;           else             tb.TableStyle = tsId;           // Create a 2-dimensional array           // of our table contents           string[,] str = new string[6, 3];           str[0, 0] = "Material Properties Table";           str[1, 0] = "Part No.";           str[1, 1] = "Name";           str[1, 2] = "Material";           str[2, 0] = "1876-1";           str[2, 1] = "Flange";           str[2, 2] = "Perspex";           str[3, 0] = "0985-4";           str[3, 1] = "Bolt";           str[3, 2] = "Steel";           str[4, 0] = "3476-K";           str[4, 1] = "Tile";           str[4, 2] = "Ceramic";           str[5, 0] = "8734-3";           str[5, 1] = "Kean";           str[5, 2] = "Mostly water";           // Use a nested loop to add and format each cell           for (int i = 0; i < 6; i++)           {             if (i == 0)             {               // This is for the title               tb.SetTextHeight(0, 0, 1);               tb.SetTextString(0, 0, str[0, 0]);               tb.SetAlignment(0, 0, CellAlignment.MiddleCenter);             }             else             {               // These are the header and data rows               for (int j = 0; j < 3; j++)               {                 tb.SetTextHeight(i, j, 1);                 tb.SetTextString(i, j, str[i, j]);                 tb.SetAlignment(i, j, CellAlignment.MiddleCenter);               }             }           }           tb.GenerateLayout();           BlockTableRecord btr =             (BlockTableRecord)tr.GetObject(               bt[BlockTableRecord.ModelSpace],               OpenMode.ForWrite             );           btr.AppendEntity(tb);           tr.AddNewlyCreatedDBObject(tb, true);           tr.Commit();         }       }     }   } }

One other minor enhancement: I made use of the TableStyle.PostTableStyleToDatabase() method to add the style to the appropriate location in the Database (we previously edited the TableStyleDictionary directly to achieve this).
Here's what happens when we run the CTWS command (making sure that we have adjusted the display settings to use lineweights):

And here's the updated style in AutoCAD's TableStyle dialog:

That's better. At least in that it does what was expected of it, even if it's not winning any design awards. :-)