[表格] 求教：如何合并单元格

admin

1. using Autodesk.AutoCAD.ApplicationServices;
3. using Autodesk.AutoCAD.DatabaseServices;
5. using Autodesk.AutoCAD.EditorInput;
7. using Autodesk.AutoCAD.Runtime;
11. namespace TableStyleEditing
13. {
15.   public class Commands
17.   {
19.     [CommandMethod("UTT")]
21.     public void UnmergeTableTitle()
23.     {
25.       var doc = Application.DocumentManager.MdiActiveDocument;
27.       if (doc == null) return;
29.       var ed = doc.Editor;
33.       // Select a table
37.       var peo = new PromptEntityOptions("\nSelect table");
39.       peo.SetRejectMessage("\nMust be a table.");
41.       peo.AddAllowedClass(typeof(Table), false);
43.       var per = ed.GetEntity(peo);
45.       if (per.Status != PromptStatus.OK)
47.         return;
51.       using (var tr = doc.TransactionManager.StartTransaction())
53.       {
55.         var table = tr.GetObject(per.ObjectId, OpenMode.ForWrite) as Table;
57.         if (table != null)
59.         {
61.           // Get the first row
65.           var row = table.Rows[0];
69.           // If it is merged, unmerge it
73.           if (row.IsMerged.HasValue && row.IsMerged.Value)
75.           {
77.             table.UnmergeCells(row);
79.             ed.WriteMessage("\nUnmerged first row.");
81.           }
83.           else
85.           {
87.             ed.WriteMessage("\nFirst row is not merged.");
89.           }
91.         }
93.         tr.Commit();
95.       }
97.     }
99.   }
101. }

复制代码