AutoCAD Overrule .NET: Centerline Circle DrawableOverrule Supporting Block Re...

eachy

AutoCAD Overrule .NET: Centerline Circle DrawableOverrule Supporting Block References (INSERTs)AutoCAD has provided the Overrule .NET API in recent versions. It is the most powerful .NET API so far and can provide almost the custom entity feature that is still only available in the most powerful AutoCAD API, ObjectARX. On the other hand, however, the Overrule API is also the most complex part in the AutoCAD .NET.
Centerline Circle is a common drawing element in the engineering design world but is not provided by AutoCAD natively. Though AutoCAD has some means to control how to show the circle center point, it is far from enough. We have presented the centerline circle overrule implementations in some earlier posts.
However, the previous version of the Centerline Circle DrawableOverrule does not support circles nested in something else such as block references (INSERTs). In this post, let’s enhance our Centerline Circle DrawableOverrule to make it support block references (INSERTs). Here is the code.

1. #region Namespaces
   
2. 
   
3. using System;
   
4. using System.Text;
   
5. using System.Linq;
   
6. using System.Xml;
   
7. using System.Reflection;
   
8. using System.ComponentModel;
   
9. using System.Collections;
   
10. using System.Collections.Generic;
    
11. using System.Windows;
    
12. using System.Windows.Media.Imaging;
    
13. using System.Windows.Forms;
    
14. using System.Diagnostics;
    
15. using System.Drawing;
    
16. using System.IO;
    
17. 
    
18. using Autodesk.AutoCAD.ApplicationServices;
    
19. using Autodesk.AutoCAD.DatabaseServices;
    
20. using Autodesk.AutoCAD.Runtime;
    
21. using Autodesk.AutoCAD.EditorInput;
    
22. using Autodesk.AutoCAD.Geometry;
    
23. using Autodesk.AutoCAD.Windows;
    
24. 
    
25. using MgdAcApplication = Autodesk.AutoCAD.ApplicationServices.Application;
    
26. using MgdAcDocument = Autodesk.AutoCAD.ApplicationServices.Document;
    
27. using AcWindowsNS = Autodesk.AutoCAD.Windows;
    
28. 
    
29. #endregion
    
30. 
    
31. using Autodesk.AutoCAD.GraphicsInterface;
    
32. 
    
33. namespace AcadNetAddinWizard_Namespace
    
34. {
    
35.     /// <summary>
    
36.     /// Features:
    
37.     ///     A derivative from the DrawableOverrule;
    
38.     ///     Being made a singleton to avoid duplicate registrations;
    
39.     ///     UCS being hornored;
    
40.     ///     Adding center lines to applicable cirlces;
    
41.     ///     WorldDraw.Geometry being used to draw the lines;
    
42.     ///     Drawing the center lines with a particular color (Cyan with index 4);
    
43.     ///     Drawing the center lines with the CENTER linetype if loaded;
    
44.     ///     SetExtensionDictionaryEntryFilter() being called to filter circles with Extension Dictionary Entry;
    
45.     ///     IsApplicable being implemented to support circle filtering;
    
46.     ///     The length of the center lines of each circle can be overridden individually;
    
47.     ///     Circles in block references (INSERTs) are also supported;
    
48.     /// </summary>
    
49.     public class CenterlineCircle_DrawableOverrule6 : DrawableOverrule
    
50.     {
    
51.         protected CenterlineCircle_DrawableOverrule6()
    
52.         {
    
53.             //The overrule only works with certain circles marked with the Extension Dictionary Entry.
    
54.             SetExtensionDictionaryEntryFilter(CenterlineCircle_Gadgets.CLCircle_ID);
    
55.             //SetCustomFilter();
    
56.         }
    
57. 
    
58.         protected static CenterlineCircle_DrawableOverrule6 mInstance;
    
59.         public static CenterlineCircle_DrawableOverrule6 Instance
    
60.         {
    
61.             get
    
62.             {
    
63.                 if (mInstance == null)
    
64.                     mInstance = new CenterlineCircle_DrawableOverrule6();
    
65.                 return mInstance;
    
66.             }
    
67.             set
    
68.             {
    
69.                 mInstance = value;
    
70.             }
    
71.         }
    
72. 
    
73.         public override bool WorldDraw(Drawable drawable, WorldDraw wd)
    
74.         {
    
75.             if (drawable is Circle)
    
76.             {
    
77.                 Circle cir = drawable as Circle;
    
78.                 Point3d cen = cir.Center;
    
79.                 double rad = cir.Radius;
    
80. 
    
81.                 Matrix3d transform = wd.Geometry.ModelToWorldTransform;
    
82.                 if (transform == Matrix3d.Identity)
    
83.                 {
    
84.                     transform = MgdAcApplication.DocumentManager.MdiActiveDocument.Editor.CurrentUserCoordinateSystem;
    
85.                     cen = cen.TransformBy(transform.Inverse());
    
86.                 }
    
87.                
    
88.                 double ratio;
    
89.                 object value = CenterlineCircle_Gadgets.GetDictionaryEntryTypedValue(
    
90.                                 CenterlineCircle_Gadgets.GetExtensionDictionaryEntry(cir.ObjectId, CenterlineCircle_Gadgets.CLCircle_ID),
    
91.                                 (int)DxfCode.ExtendedDataScale);
    
92.                 if (value == null)
    
93.                     ratio = CenterlineCircle_Gadgets.DefaultRatioLengthToRadius;
    
94.                 else
    
95.                     ratio = Convert.ToDouble(value);
    
96. 
    
97.                 Point3d line1Pt1 = new Point3d(cen.X - rad * ratio, cen.Y, cen.Z).TransformBy(transform);
    
98.                 Point3d line1Pt2 = new Point3d(cen.X + rad * ratio, cen.Y, cen.Z).TransformBy(transform);
    
99.                 Point3d line2Pt1 = new Point3d(cen.X, cen.Y - rad * ratio, cen.Z).TransformBy(transform);
    
100.                 Point3d line2Pt2 = new Point3d(cen.X, cen.Y + rad * ratio, cen.Z).TransformBy(transform);
     
101. 
     
102.                 short backupColor = wd.SubEntityTraits.Color;
     
103.                 wd.SubEntityTraits.Color = 4;
     
104. 
     
105.                 ObjectId backupLinetypeId = wd.SubEntityTraits.LineType;
     
106.                 if (GetCenterLinetype() != ObjectId.Null)
     
107.                 {
     
108.                     wd.SubEntityTraits.LineType = CenterLinetypeId;
     
109.                 }
     
110.                 wd.Geometry.WorldLine(line1Pt1, line1Pt2);
     
111.                 wd.Geometry.WorldLine(line2Pt1, line2Pt2);
     
112.                 wd.SubEntityTraits.LineType = backupLinetypeId;
     
113. 
     
114.                 wd.SubEntityTraits.Color = backupColor;
     
115.             }
     
116. 
     
117.             return base.WorldDraw(drawable, wd);
     
118.         }
     
119. 
     
120.         //The Extension Dictionary Entry filtering can also be implemented here, but we choose to call the
     
121.         // straightforward SetExtensionDictionaryEntryFilter() in the constructor to simply things. For custom
     
122.         // filters, the IsApplicable() has to be implemented.
     
123.         public override bool IsApplicable(RXObject overruledSubject)
     
124.         {
     
125.             return base.IsApplicable(overruledSubject);
     
126.         }
     
127. 
     
128.         private static ObjectId CenterLinetypeId = ObjectId.Null;
     
129.         public static ObjectId GetCenterLinetype()
     
130.         {
     
131.             Database db = HostApplicationServices.WorkingDatabase;
     
132.             if (CenterLinetypeId != ObjectId.Null && CenterLinetypeId.IsValid && CenterLinetypeId.IsResident && CenterLinetypeId.Database == db)
     
133.                 return CenterLinetypeId;
     
134.             else
     
135.                 CenterLinetypeId = ObjectId.Null;
     
136. 
     
137.             using (Transaction tr = db.TransactionManager.StartTransaction())
     
138.             {
     
139.                 foreach (ObjectId id in db.LinetypeTableId.GetObject(OpenMode.ForRead) as LinetypeTable)
     
140.                 {
     
141.                     LinetypeTableRecord ltr = id.GetObject(OpenMode.ForRead) as LinetypeTableRecord;
     
142.                     if (ltr.Name == "CENTER")
     
143.                     {
     
144.                         CenterLinetypeId = ltr.ObjectId;
     
145.                         break;
     
146.                     }
     
147.                 }
     
148.                 tr.Commit();
     
149.             }
     
150. 
     
151.             return CenterLinetypeId;
     
152.         }
     
153. 
     
154.     }
     
155. }
     

#region Namespaces<br /> <br /> using System;<br /> using System.Text;<br /> using System.Linq;<br /> using System.Xml;<br /> using System.Reflection;<br /> using System.ComponentModel;<br /> using System.Collections;<br /> using System.Collections.Generic;<br /> using System.Windows;<br /> using System.Windows.Media.Imaging;<br /> using System.Windows.Forms;<br /> using System.Diagnostics;<br /> using System.Drawing;<br /> using System.IO;<br /> <br /> using Autodesk.AutoCAD.ApplicationServices;<br /> using Autodesk.AutoCAD.DatabaseServices;<br /> using Autodesk.AutoCAD.Runtime;<br /> using Autodesk.AutoCAD.EditorInput;<br /> using Autodesk.AutoCAD.Geometry;<br /> using Autodesk.AutoCAD.Windows;<br /> <br /> using MgdAcApplication = Autodesk.AutoCAD.ApplicationServices.Application;<br /> using MgdAcDocument = Autodesk.AutoCAD.ApplicationServices.Document;<br /> using AcWindowsNS = Autodesk.AutoCAD.Windows;<br /> <br /> #endregion<br /> <br /> using Autodesk.AutoCAD.GraphicsInterface;<br /> <br /> namespace AcadNetAddinWizard_Namespace<br /> {<br />     /// <summary><br />     /// Features:<br />     ///     A derivative from the DrawableOverrule;<br />     ///     Being made a singleton to avoid duplicate registrations;<br />     ///     UCS being hornored;<br />     ///     Adding center lines to applicable cirlces;<br />     ///     WorldDraw.Geometry being used to draw the lines;<br />     ///     Drawing the center lines with a particular color (Cyan with index 4);<br />     ///     Drawing the center lines with the CENTER linetype if loaded;<br />     ///     SetExtensionDictionaryEntryFilter() being called to filter circles with Extension Dictionary Entry;<br />     ///     IsApplicable being implemented to support circle filtering;<br />     ///     The length of the center lines of each circle can be overridden individually;<br />     ///     Circles in block references (INSERTs) are also supported;<br />     /// </summary><br />     public class CenterlineCircle_DrawableOverrule6 : DrawableOverrule<br />     {<br />         protected CenterlineCircle_DrawableOverrule6()<br />         {<br />             //The overrule only works with certain circles marked with the Extension Dictionary Entry.<br />             SetExtensionDictionaryEntryFilter(CenterlineCircle_Gadgets.CLCircle_ID);<br />             //SetCustomFilter();<br />         }<br /> <br />         protected static CenterlineCircle_DrawableOverrule6 mInstance;<br />         public static CenterlineCircle_DrawableOverrule6 Instance<br />         {<br />             get<br />             {<br />                 if (mInstance == null)<br />                     mInstance = new CenterlineCircle_DrawableOverrule6();<br />                 return mInstance;<br />             }<br />             set<br />             {<br />                 mInstance = value;<br />             }<br />         }<br /> <br />         public override bool WorldDraw(Drawable drawable, WorldDraw wd)<br />         {<br />             if (drawable is Circle)<br />             {<br />                 Circle cir = drawable as Circle;<br />                 Point3d cen = cir.Center;<br />                 double rad = cir.Radius;<br /> <br />                 Matrix3d transform = wd.Geometry.ModelToWorldTransform;<br />                 if (transform == Matrix3d.Identity)<br />                 {<br />                     transform = MgdAcApplication.DocumentManager.MdiActiveDocument.Editor.CurrentUserCoordinateSystem;<br />                     cen = cen.TransformBy(transform.Inverse());<br />                 }<br />                 <br />                 double ratio;<br />                 object value = CenterlineCircle_Gadgets.GetDictionaryEntryTypedValue(<br />                                 CenterlineCircle_Gadgets.GetExtensionDictionaryEntry(cir.ObjectId, CenterlineCircle_Gadgets.CLCircle_ID),<br />                                 (int)DxfCode.ExtendedDataScale);<br />                 if (value == null)<br />                     ratio = CenterlineCircle_Gadgets.DefaultRatioLengthToRadius;<br />                 else<br />                     ratio = Convert.ToDouble(value);<br /> <br />                 Point3d line1Pt1 = new Point3d(cen.X - rad * ratio, cen.Y, cen.Z).TransformBy(transform);<br />                 Point3d line1Pt2 = new Point3d(cen.X + rad * ratio, cen.Y, cen.Z).TransformBy(transform);<br />                 Point3d line2Pt1 = new Point3d(cen.X, cen.Y - rad * ratio, cen.Z).TransformBy(transform);<br />                 Point3d line2Pt2 = new Point3d(cen.X, cen.Y + rad * ratio, cen.Z).TransformBy(transform);<br /> <br />                 short backupColor = wd.SubEntityTraits.Color;<br />                 wd.SubEntityTraits.Color = 4;<br /> <br />                 ObjectId backupLinetypeId = wd.SubEntityTraits.LineType;<br />                 if (GetCenterLinetype() != ObjectId.Null)<br />                 {<br />                     wd.SubEntityTraits.LineType = CenterLinetypeId;<br />                 }<br />                 wd.Geometry.WorldLine(line1Pt1, line1Pt2);<br />                 wd.Geometry.WorldLine(line2Pt1, line2Pt2);<br />                 wd.SubEntityTraits.LineType = backupLinetypeId;<br /> <br />                 wd.SubEntityTraits.Color = backupColor;<br />             }<br /> <br />             return base.WorldDraw(drawable, wd);<br />         }<br /> <br />         //The Extension Dictionary Entry filtering can also be implemented here, but we choose to call the <br />         // straightforward SetExtensionDictionaryEntryFilter() in the constructor to simply things. For custom<br />         // filters, the IsApplicable() has to be implemented.<br />         public override bool IsApplicable(RXObject overruledSubject)<br />         {<br />             return base.IsApplicable(overruledSubject);<br />         }<br /> <br />         private static ObjectId CenterLinetypeId = ObjectId.Null;<br />         public static ObjectId GetCenterLinetype()<br />         {<br />             Database db = HostApplicationServices.WorkingDatabase;<br />             if (CenterLinetypeId != ObjectId.Null && CenterLinetypeId.IsValid && CenterLinetypeId.IsResident && CenterLinetypeId.Database == db)<br />                 return CenterLinetypeId;<br />             else<br />                 CenterLinetypeId = ObjectId.Null;<br /> <br />             using (Transaction tr = db.TransactionManager.StartTransaction())<br />             {<br />                 foreach (ObjectId id in db.LinetypeTableId.GetObject(OpenMode.ForRead) as LinetypeTable)<br />                 {<br />                     LinetypeTableRecord ltr = id.GetObject(OpenMode.ForRead) as LinetypeTableRecord;<br />                     if (ltr.Name == "CENTER")<br />                     {<br />                         CenterLinetypeId = ltr.ObjectId;<br />                         break;<br />                     }<br />                 }<br />                 tr.Commit();<br />             }<br /> <br />             return CenterLinetypeId;<br />         }<br /> <br />     }<br /> }<br />

Here is the test command

1. [CommandMethod("ShowCircleCenterline6")]
   
2. public static void ShowCircleCenterline6_Method()
   
3. {
   
4.     CenterlineCircle_Gadgets.RegisterOverrule(typeof(Circle), CenterlineCircle_DrawableOverrule6.Instance);
   
5. }
   
6. 
   
7. [CommandMethod("HideCircleCenterline6")]
   
8. public static void HideCircleCenterline6_Method()
   
9. {
   
10.     CenterlineCircle_Gadgets.UnregisterOverrule(typeof(Circle), CenterlineCircle_DrawableOverrule6.Instance);
    
11. }

[CommandMethod("ShowCircleCenterline6")]<br /> public static void ShowCircleCenterline6_Method()<br /> {<br />     CenterlineCircle_Gadgets.RegisterOverrule(typeof(Circle), CenterlineCircle_DrawableOverrule6.Instance);<br /> }<br /> <br /> [CommandMethod("HideCircleCenterline6")]<br /> public static void HideCircleCenterline6_Method()<br /> {<br />     CenterlineCircle_Gadgets.UnregisterOverrule(typeof(Circle), CenterlineCircle_DrawableOverrule6.Instance);<br /> }

Here is an image to show the effect.

As can be seen, the centerlines of both block references (on the left side) and circles themselves (on the right side) all appear well. Some highlights may look good to help understand the code.
&#8226; The centerline circle overrule is derived from the DrawableOverrule API class;
&#8226; The centerline circle overrule is made a singleton to avoid duplicate registrations or similar issues;
&#8226; The centerline circle overrule works with both UCS and WCS;
&#8226; The WorldDraw of the centerline circle overrule has been overridden and its Geometry.WorldLine is used to draw the centerlines;
&#8226; The centerline circle overrule draws the centerlines with a hard coded color (Cyan with index 4) through setting the WorldDraw.SubEntityTraits.Color property.
&#8226; The centerlines are drawn with the Center linetype through assigning its ObjectId to the WorldDraw.SubEntityTraits.LineType property before adding the centerlines.
&#8226; Please do not forget to back up the original linetype and assign it back after the centerline being drawn. Otherwise, the circle itself will be drawn with the Center linetype too.
&#8226; A filter is added to make some circles behave with centerlines added and others behave still normal.
&#8226; The SetExtensionDictionaryEntryFilter() is called to filter circles with a particular Extension Dictionary Entry;
&#8226; The IsApplicable is implemented to support circle filtering.
&#8226; The Extension Dictionary Entry filtering can also be implemented in the IsApplicable method.
&#8226; We choose to call the straightforward SetExtensionDictionaryEntryFilter() in the constructor to simply things since it work fine here.
&#8226;  The length ratio parameter of the centerlines of each circle has been recorded into the extension dictionary as an XRecord.
&#8226; To support Block References (INSERTs) some extra transformation work needs to be done as demonstrated.

Gdlprfcu

怎么全是英文的？还以为上错网站了。

eachy

Gdlprfcu 发表于 2013-6-12 11:42
怎么全是英文的？还以为上错网站了。

中文资料确实少啊!