Copy From Groups

csharp

1. using System;
   
2. using System.Globalization;
   
3. using System.Runtime.InteropServices;
   
4. using Autodesk.AutoCAD.ApplicationServices;
   
5. using Autodesk.AutoCAD.EditorInput;
   
6. using Autodesk.AutoCAD.Runtime;
   
7. using Autodesk.AutoCAD.Geometry;
   
8. using Autodesk.AutoCAD.DatabaseServices;
   
9. using Autodesk.AutoCAD.Interop.Common;
   
10. using AcadApp = Autodesk.AutoCAD.Interop.AcadApplication;
    
11. using Autodesk.AutoCAD.Interop;
    
12. 
    
13. namespace PartGroupsMonitor
    
14. {
    
15.     class CopyGroupFromExisting
    
16.     {
    
17.         public void CreateGroup()
    
18.         {
    
19.             Document document = Application.DocumentManager.MdiActiveDocument;
    
20.             Editor editor = document.Editor;
    
21.             Database database = Application.DocumentManager.MdiActiveDocument.Database;
    
22.             Matrix3d MoveMat = new Matrix3d();
    
23.             string NewNam = "";
    
24.             
    
25. 
    
26.             using (document.LockDocument())
    
27.             {
    
28.                 PromptEntityOptions options = new PromptEntityOptions("\nSelect part of Group: < pick > ");
    
29.                 options.SetRejectMessage("\nMust be Group related. ");
    
30. 
    
31.                 options.AddAllowedClass(typeof(Arc), false);
    
32.                 options.AddAllowedClass(typeof(Line), false);
    
33.                 options.AddAllowedClass(typeof(Circle), false);
    
34.                 options.AddAllowedClass(typeof(Polyline), false);
    
35. 
    
36.                 PaletteUtils.ActivateEditor();
    
37.                 PromptEntityResult selection = editor.GetEntity(options);
    
38. 
    
39.                 if (selection.Status == PromptStatus.OK)
    
40.                 {
    
41.                     Object MvePnt = GroupDisplacementPoint();
    
42. 
    
43.                     if (MvePnt is Point3d)
    
44.                     {
    
45.                         Point3d p1 = (Point3d)MvePnt;
    
46. 
    
47.                         using (Transaction trans = database.TransactionManager.StartTransaction())
    
48.                         {
    
49.                             Entity obj = (Entity)trans.GetObject(selection.ObjectId, OpenMode.ForRead);
    
50. 
    
51.                             if (obj != null)
    
52.                             {
    
53. 
    
54.                                 Point3d basePt = obj.GeomExtents.MaxPoint;
    
55.                                 MoveMat = Matrix3d.Displacement(p1.GetVectorTo(basePt));
    
56. 
    
57.                                 ResultBuffer rbf = SafeNativeMethods.EntGet(obj.ObjectId);
    
58.                                 TypedValue[] XdataOut = rbf.AsArray();
    
59. 
    
60.                                 if (XdataOut[3].Value.ToString() == "{ACAD_REACTORS")
    
61.                                 {                                   
    
62.                                     
    
63.                                     ObjectId reactorId = (ObjectId)XdataOut[4].Value;                              
    
64. 
    
65.                                     DBDictionary GrpDic = (DBDictionary)trans.GetObject(database.GroupDictionaryId, OpenMode.ForWrite);
    
66. 
    
67.                                     Group grp = (Group)trans.GetObject(reactorId, OpenMode.ForWrite);                                    
    
68.                                     
    
69.                                     string str = grp.Name;
    
70.                                     NewNam = string.Concat(str.Substring(0, str.IndexOf("-", 0, str.Length) + 3), DateTime.Now.Millisecond.ToString());
    
71. 
    
72.                                     Group NewGroup = new Group(NewNam, true);
    
73. 
    
74.                                     NewGroup.Description = DateTime.Now.ToShortDateString();
    
75.                                     
    
76.                                     ObjectIdCollection IDCol = new ObjectIdCollection(grp.GetAllEntityIds());
    
77. 
    
78.                                     IdMapping IDMap = new IdMapping();
    
79. 
    
80.                                     IDMap = database.DeepCloneObjects(IDCol, database.CurrentSpaceId, false);
    
81.                                     
    
82.                                     foreach (IdPair pair in IDMap)
    
83.                                     {
    
84.                                         if (pair.IsPrimary)
    
85.                                         {
    
86. 
    
87.                                             Entity en = (Entity)trans.GetObject(pair.Value, OpenMode.ForRead);
    
88.                                             
    
89.                                             en.UpgradeOpen();                                            
    
90.                                             en.TransformBy(MoveMat);
    
91.                                             NewGroup.Append(en.ObjectId);
    
92.                                             en.RecordGraphicsModified(true);
    
93.                                             trans.TransactionManager.QueueForGraphicsFlush();
    
94.                                             en.DowngradeOpen();                                            
    
95.                                             
    
96.                                         }
    
97.                                     }                                    
    
98. 
    
99.                                     GrpDic.SetAt(NewNam, NewGroup);
    
100. 
     
101.                                     trans.AddNewlyCreatedDBObject(NewGroup, false);
     
102. 
     
103.                                     NewGroup.DowngradeOpen();
     
104.                                     AcadDocument ADoc = (AcadDocument)document.AcadDocument;
     
105.                                     AcadObject AO = ADoc.Dictionaries.Item("ACAD_GROUP");
     
106.                                     IAcadGroups iags = (IAcadGroups)AO;
     
107.                                     iags.Add(NewNam);                                                                                                
     
108. 
     
109.                                     trans.Commit();
     
110. 
     
111.                                     editor.WriteMessage("\nGroup < " + str + " > selected. ");
     
112. 
     
113.                                 }                                
     
114.                             }
     
115.                             else
     
116.                             {
     
117.                                 editor.WriteMessage("\nMust be Group related. ");
     
118.                             }
     
119.                         }
     
120.                     }
     
121.                     else
     
122.                     {
     
123.                         editor.WriteMessage("\n *Cancelled* ");
     
124.                     }                    
     
125.                 }
     
126.                 else
     
127.                 {                    
     
128.                     editor.WriteMessage("\nNothing Picked: *" + selection.Status.ToString() + "*");
     
129.                 }
     
130.             }            
     
131.             editor.WriteMessage("\n\nCommand:\n");            
     
132.             database.Dispose();            
     
133.         }
     
134.         
     
135.         public Object GroupDisplacementPoint()
     
136.         {
     
137.             Document document = Application.DocumentManager.MdiActiveDocument;
     
138.             Editor editor = document.Editor;
     
139.             PromptPointOptions options2 = new PromptPointOptions("\nPick location point: ");
     
140.             options2.AllowNone = false;
     
141.             PromptPointResult point = editor.GetPoint(options2);
     
142.             
     
143.             return point.Value;
     
144.             
     
145.         }        
     
146.     }
     
147. }
     
148. 
     

using System;<br /> using System.Globalization;<br /> using System.Runtime.InteropServices;<br /> using Autodesk.AutoCAD.ApplicationServices;<br /> using Autodesk.AutoCAD.EditorInput;<br /> using Autodesk.AutoCAD.Runtime;<br /> using Autodesk.AutoCAD.Geometry;<br /> using Autodesk.AutoCAD.DatabaseServices;<br /> using Autodesk.AutoCAD.Interop.Common;<br /> using AcadApp = Autodesk.AutoCAD.Interop.AcadApplication;<br /> using Autodesk.AutoCAD.Interop;<br /> <br /> namespace PartGroupsMonitor<br /> {<br />     class CopyGroupFromExisting<br />     {<br />         public void CreateGroup()<br />         {<br />             Document document = Application.DocumentManager.MdiActiveDocument;<br />             Editor editor = document.Editor;<br />             Database database = Application.DocumentManager.MdiActiveDocument.Database;<br />             Matrix3d MoveMat = new Matrix3d();<br />             string NewNam = "";<br />             <br /> <br />             using (document.LockDocument())<br />             {<br />                 PromptEntityOptions options = new PromptEntityOptions("\nSelect part of Group: < pick > ");<br />                 options.SetRejectMessage("\nMust be Group related. ");<br /> <br />                 options.AddAllowedClass(typeof(Arc), false);<br />                 options.AddAllowedClass(typeof(Line), false);<br />                 options.AddAllowedClass(typeof(Circle), false);<br />                 options.AddAllowedClass(typeof(Polyline), false);<br /> <br />                 PaletteUtils.ActivateEditor();<br />                 PromptEntityResult selection = editor.GetEntity(options);<br /> <br />                 if (selection.Status == PromptStatus.OK)<br />                 {<br />                     Object MvePnt = GroupDisplacementPoint();<br /> <br />                     if (MvePnt is Point3d)<br />                     {<br />                         Point3d p1 = (Point3d)MvePnt;<br /> <br />                         using (Transaction trans = database.TransactionManager.StartTransaction())<br />                         {<br />                             Entity obj = (Entity)trans.GetObject(selection.ObjectId, OpenMode.ForRead);<br /> <br />                             if (obj != null)<br />                             {<br /> <br />                                 Point3d basePt = obj.GeomExtents.MaxPoint;<br />                                 MoveMat = Matrix3d.Displacement(p1.GetVectorTo(basePt));<br /> <br />                                 ResultBuffer rbf = SafeNativeMethods.EntGet(obj.ObjectId);<br />                                 TypedValue[] XdataOut = rbf.AsArray();<br /> <br />                                 if (XdataOut[3].Value.ToString() == "{ACAD_REACTORS")<br />                                 {                                   <br />                                     <br />                                     ObjectId reactorId = (ObjectId)XdataOut[4].Value;                               <br /> <br />                                     DBDictionary GrpDic = (DBDictionary)trans.GetObject(database.GroupDictionaryId, OpenMode.ForWrite);<br /> <br />                                     Group grp = (Group)trans.GetObject(reactorId, OpenMode.ForWrite);                                    <br />                                     <br />                                     string str = grp.Name;<br />                                     NewNam = string.Concat(str.Substring(0, str.IndexOf("-", 0, str.Length) + 3), DateTime.Now.Millisecond.ToString());<br /> <br />                                     Group NewGroup = new Group(NewNam, true);<br /> <br />                                     NewGroup.Description = DateTime.Now.ToShortDateString();<br />                                     <br />                                     ObjectIdCollection IDCol = new ObjectIdCollection(grp.GetAllEntityIds());<br /> <br />                                     IdMapping IDMap = new IdMapping();<br /> <br />                                     IDMap = database.DeepCloneObjects(IDCol, database.CurrentSpaceId, false);<br />                                     <br />                                     foreach (IdPair pair in IDMap)<br />                                     {<br />                                         if (pair.IsPrimary)<br />                                         {<br /> <br />                                             Entity en = (Entity)trans.GetObject(pair.Value, OpenMode.ForRead);<br />                                             <br />                                             en.UpgradeOpen();                                            <br />                                             en.TransformBy(MoveMat);<br />                                             NewGroup.Append(en.ObjectId);<br />                                             en.RecordGraphicsModified(true);<br />                                             trans.TransactionManager.QueueForGraphicsFlush();<br />                                             en.DowngradeOpen();                                            <br />                                             <br />                                         }<br />                                     }                                    <br /> <br />                                     GrpDic.SetAt(NewNam, NewGroup);<br /> <br />                                     trans.AddNewlyCreatedDBObject(NewGroup, false);<br /> <br />                                     NewGroup.DowngradeOpen();<br />                                     AcadDocument ADoc = (AcadDocument)document.AcadDocument;<br />                                     AcadObject AO = ADoc.Dictionaries.Item("ACAD_GROUP");<br />                                     IAcadGroups iags = (IAcadGroups)AO;<br />                                     iags.Add(NewNam);                                                                                                 <br /> <br />                                     trans.Commit();<br /> <br />                                     editor.WriteMessage("\nGroup < " + str + " > selected. "); <br /> <br />                                 }                                <br />                             }<br />                             else<br />                             {<br />                                 editor.WriteMessage("\nMust be Group related. ");<br />                             }<br />                         }<br />                     }<br />                     else<br />                     {<br />                         editor.WriteMessage("\n *Cancelled* ");<br />                     }                    <br />                 }<br />                 else<br />                 {                    <br />                     editor.WriteMessage("\nNothing Picked: *" + selection.Status.ToString() + "*");<br />                 }<br />             }            <br />             editor.WriteMessage("\n\nCommand:\n");            <br />             database.Dispose();            <br />         }<br />         <br />         public Object GroupDisplacementPoint()<br />         {<br />             Document document = Application.DocumentManager.MdiActiveDocument;<br />             Editor editor = document.Editor;<br />             PromptPointOptions options2 = new PromptPointOptions("\nPick location point: ");<br />             options2.AllowNone = false;<br />             PromptPointResult point = editor.GetPoint(options2);<br />             <br />             return point.Value;<br />             <br />         }        <br />     }<br /> }<br /> <br />

csharp

标记一下
SafeNativeMethods.EntGet