存取 dynamic block 中的可见实体

eachy

Accessing visible entities in a dynamic blockBy Philippe Leefsma

Here is a question once posted by an ADN member:
How do I access the list of visible entities for a specific visibility state in a dynamic block that contains a visibility parameter?
The following solution is a code sample based on a suggestion proposed by Tony Tanzillo in this forum post.

Solution
Unfortunately, as the dynamic block API is a bit limited, there is no direct way to access this information. This is actually buried in the dynamic block definition's extension dictionary, and the object you need to look for is an instance of an "AcDbBlockVisibilityParameter" (that's the native ObjectARX class and the runtime class name, but it isn’t exposed to the public API, neither in C++ nor .Net).
So a bit of extra work is needed in order to obtain it, here are the steps:
1. Get the BlockTableRecord for the dynamic block definition.
2. Get the extension dictionary for the BlockTableRecord.
3. Get ObjectId of the "ACAD_ENHANCEDBLOCK" entry in the extension dictionary.
4. call acdbEntGet() on ObjectId obtained in step 3, which returns a ResultBuffer containing TypedValues.
5. Iterate over the TypedValues looking for an item whose group code is 360, and get the ObjectId stored in the
TypedValue's Value property, then get value of the 'Name' property of the ObjectId's ObjectClass property,
and see if it equals the string "AcDbBlockVisibilityParameter".
6. Once you've found the AcDbBlockVisibilityParameter object's ObjectId, call acdbEntGet() on it.
7. Iterate over the TypedValues in the ResultBuffer returned by acdbEntGet(), looking for an item whose group code is 303.

8. Get the next element from the ResultBuffer, which is a 94 group code whose value is the number of ObjectIds that follow, and then read that many subsequent items and collect the ObjectIds in each into a list, and you then have finally the ObjectIds of the block entities that are explicitly visible in the visiblity state.
Here is the complete C# code:

1. [CommandMethod("DynablockVisibilityStates")]
   
2. public void DynablockVisibilityStates()
   
3. {
   
4.     Document doc = Application.DocumentManager.MdiActiveDocument;
   
5.     Database db = doc.Database;
   
6.     Editor ed = doc.Editor;
   
7.     PromptResult pr = ed.GetString("\nEnter block name: ");
   
8.     if (pr.Status != PromptStatus.OK)
   
9.         return;
   
10.     using (Transaction Tx = db.TransactionManager.StartTransaction())
    
11.     {
    
12.         BlockTable bt = Tx.GetObject(
    
13.             db.BlockTableId,
    
14.            OpenMode.ForRead)
    
15.                 as BlockTable;
    
16.         if (!bt.Has(pr.StringResult))
    
17.         {
    
18.             ed.WriteMessage("\nBlock doesn't exist :(");
    
19.             return;
    
20.         }
    
21.         BlockTableRecord btr = Tx.GetObject(
    
22.             bt[pr.StringResult],
    
23.             OpenMode.ForRead)
    
24.                 as BlockTableRecord;
    
25.         if (!btr.IsDynamicBlock)
    
26.         {
    
27.             ed.WriteMessage("\nNot a dynamic block :(");
    
28.             return;
    
29.         }
    
30.         if (btr.ExtensionDictionary == null)
    
31.         {
    
32.             ed.WriteMessage("\nNo ExtensionDictionary :(");
    
33.             return;
    
34.         }
    
35.         DBDictionary dico = Tx.GetObject(
    
36.             btr.ExtensionDictionary,
    
37.             OpenMode.ForRead)
    
38.                 as DBDictionary;
    
39.         if (!dico.Contains("ACAD_ENHANCEDBLOCK"))
    
40.         {
    
41.             ed.WriteMessage(
    
42.                 "\nACAD_ENHANCEDBLOCK Entry not found :(");
    
43.             return;
    
44.         }
    
45.         ObjectId graphId = dico.GetAt("ACAD_ENHANCEDBLOCK");
    
46.         System.Collections.Generic.List<object> parameterIds =
    
47.             acdbEntGetObjects(graphId, 360);
    
48.         foreach (object parameterId in parameterIds)
    
49.         {
    
50.             ObjectId id = (ObjectId)parameterId;
    
51.             if (id.ObjectClass.Name ==
    
52.                 "AcDbBlockVisibilityParameter")
    
53.             {
    
54.                 System.Collections.Generic.List<TypedValue>
    
55.                     visibilityParam = acdbEntGetTypedVals(id);
    
56.                 System.Collections.Generic.
    
57.                     List<TypedValue>.Enumerator enumerator =
    
58.                     visibilityParam.GetEnumerator();
    
59.                 while (enumerator.MoveNext())
    
60.                 {
    
61.                     if (enumerator.Current.TypeCode == 303)
    
62.                     {
    
63.                         string group =
    
64.                             (string)enumerator.Current.Value;
    
65.                         enumerator.MoveNext();
    
66.                         int nbEntitiesInGroup =
    
67.                             (int)enumerator.Current.Value;
    
68.                         ed.WriteMessage(
    
69.                            "\n . Visibility Group: " + group +
    
70.                            " Nb Entities in group: " +
    
71.                            nbEntitiesInGroup);
    
72.                         for (int i = 0; i < nbEntitiesInGroup; ++i)
    
73.                         {
    
74.                             enumerator.MoveNext();
    
75.                             ObjectId entityId =
    
76.                                 (ObjectId)enumerator.Current.Value;
    
77.                             Entity entity = Tx.GetObject(
    
78.                                 entityId,
    
79.                                 OpenMode.ForRead)
    
80.                                     as Entity;
    
81.                             ed.WriteMessage("\n    - " +
    
82.                                 entity.ToString() + " " +
    
83.                                 entityId.ToString());
    
84.                         }
    
85.                     }
    
86.                 }
    
87.                 break;
    
88.             }
    
89.         }
    
90.         Tx.Commit();
    
91.     }
    
92. }
    
93. public struct ads_name
    
94. {
    
95.     IntPtr a;
    
96.     IntPtr b;
    
97. };
    
98. [DllImport("acdb18.dll",
    
99.     CallingConvention = CallingConvention.Cdecl,
    
100.    EntryPoint = "?acdbGetAdsName@@YA?AW4ErrorStatus@Acad@@AAY01JVAcDbObjectId@@@Z")]
     
101. 
     
102. public static extern int acdbGetAdsName(
     
103.     ref ads_name name, ObjectId objId);
     
104. [DllImport("acad.exe",
     
105.     CharSet = CharSet.Ansi,
     
106.     CallingConvention = CallingConvention.Cdecl,
     
107.     EntryPoint = "acdbEntGet")]
     
108. public static extern System.IntPtr acdbEntGet(ref ads_name ename);
     
109. private System.Collections.Generic.List<object>
     
110.     acdbEntGetObjects(ObjectId id, short dxfcode)
     
111. {
     
112.     System.Collections.Generic.List<object> result =
     
113.         new System.Collections.Generic.List<object>();
     
114.      ads_name name = new ads_name();
     
115.     int res = acdbGetAdsName(ref name, id);
     
116.     ResultBuffer rb = new ResultBuffer();
     
117.     Autodesk.AutoCAD.Runtime.Interop.AttachUnmanagedObject(
     
118.         rb, acdbEntGet(ref name), true);
     
119.     ResultBufferEnumerator iter = rb.GetEnumerator();
     
120.     while (iter.MoveNext())
     
121.     {
     
122.         TypedValue typedValue = (TypedValue)iter.Current;
     
123.         if (typedValue.TypeCode == dxfcode)
     
124.         {
     
125.             result.Add(typedValue.Value);
     
126.         }
     
127.     }
     
128.     return result;
     
129. }
     
130. private System.Collections.Generic.List<TypedValue>
     
131.     acdbEntGetTypedVals(ObjectId id)
     
132. {
     
133.     System.Collections.Generic.List<TypedValue> result =
     
134.         new System.Collections.Generic.List<TypedValue>();
     
135.     ads_name name = new ads_name();
     
136.     int res = acdbGetAdsName(ref name, id);
     
137.     ResultBuffer rb = new ResultBuffer();
     
138.     Autodesk.AutoCAD.Runtime.Interop.AttachUnmanagedObject(
     
139.         rb, acdbEntGet(ref name), true);
     
140.     ResultBufferEnumerator iter = rb.GetEnumerator();
     
141.     while (iter.MoveNext())
     
142.     {
     
143.         result.Add((TypedValue)iter.Current);
     
144.     }
     
145.     return result;
     
146. }
     

[CommandMethod("DynablockVisibilityStates")]<br /> public void DynablockVisibilityStates()<br /> {<br />     Document doc = Application.DocumentManager.MdiActiveDocument;<br />     Database db = doc.Database;<br />     Editor ed = doc.Editor;<br />     PromptResult pr = ed.GetString("\nEnter block name: ");<br />     if (pr.Status != PromptStatus.OK) <br />         return;<br />     using (Transaction Tx = db.TransactionManager.StartTransaction())<br />     {<br />         BlockTable bt = Tx.GetObject(<br />             db.BlockTableId, <br />            OpenMode.ForRead) <br />                 as BlockTable;<br />         if (!bt.Has(pr.StringResult))<br />         {<br />             ed.WriteMessage("\nBlock doesn't exist :(");<br />             return;<br />         }<br />         BlockTableRecord btr = Tx.GetObject(<br />             bt[pr.StringResult], <br />             OpenMode.ForRead) <br />                 as BlockTableRecord;<br />         if (!btr.IsDynamicBlock)<br />         {<br />             ed.WriteMessage("\nNot a dynamic block :(");<br />             return;<br />         }<br />         if (btr.ExtensionDictionary == null)<br />         {<br />             ed.WriteMessage("\nNo ExtensionDictionary :(");<br />             return;<br />         }<br />         DBDictionary dico = Tx.GetObject(<br />             btr.ExtensionDictionary, <br />             OpenMode.ForRead) <br />                 as DBDictionary;<br />         if (!dico.Contains("ACAD_ENHANCEDBLOCK"))<br />         {<br />             ed.WriteMessage(<br />                 "\nACAD_ENHANCEDBLOCK Entry not found :(");<br />             return;<br />         }<br />         ObjectId graphId = dico.GetAt("ACAD_ENHANCEDBLOCK");<br />         System.Collections.Generic.List<object> parameterIds = <br />             acdbEntGetObjects(graphId, 360);<br />         foreach (object parameterId in parameterIds)<br />         {<br />             ObjectId id = (ObjectId)parameterId;<br />             if (id.ObjectClass.Name == <br />                 "AcDbBlockVisibilityParameter")<br />             {<br />                 System.Collections.Generic.List<TypedValue> <br />                     visibilityParam = acdbEntGetTypedVals(id);<br />                 System.Collections.Generic.<br />                     List<TypedValue>.Enumerator enumerator = <br />                     visibilityParam.GetEnumerator();<br />                 while (enumerator.MoveNext())<br />                 {<br />                     if (enumerator.Current.TypeCode == 303)<br />                     {<br />                         string group = <br />                             (string)enumerator.Current.Value;<br />                         enumerator.MoveNext();<br />                         int nbEntitiesInGroup = <br />                             (int)enumerator.Current.Value;<br />                         ed.WriteMessage(<br />                            "\n . Visibility Group: " + group + <br />                            " Nb Entities in group: " + <br />                            nbEntitiesInGroup);<br />                         for (int i = 0; i < nbEntitiesInGroup; ++i)<br />                         {<br />                             enumerator.MoveNext();<br />                             ObjectId entityId = <br />                                 (ObjectId)enumerator.Current.Value;<br />                             Entity entity = Tx.GetObject(<br />                                 entityId, <br />                                 OpenMode.ForRead) <br />                                     as Entity;<br />                             ed.WriteMessage("\n    - " + <br />                                 entity.ToString() + " " + <br />                                 entityId.ToString());<br />                         }<br />                     }<br />                 }<br />                 break;<br />             }<br />         }<br />         Tx.Commit();<br />     }<br /> }<br /> public struct ads_name<br /> {<br />     IntPtr a;<br />     IntPtr b;<br /> };<br /> [DllImport("acdb18.dll",<br />     CallingConvention = CallingConvention.Cdecl,<br />    EntryPoint = "?acdbGetAdsName@@YA?AW4ErrorStatus@Acad@@AAY01JVAcDbObjectId@@@Z")]<br /> <br /> public static extern int acdbGetAdsName(<br />     ref ads_name name, ObjectId objId);<br /> [DllImport("acad.exe", <br />     CharSet = CharSet.Ansi, <br />     CallingConvention = CallingConvention.Cdecl, <br />     EntryPoint = "acdbEntGet")]<br /> public static extern System.IntPtr acdbEntGet(ref ads_name ename);<br /> private System.Collections.Generic.List<object> <br />     acdbEntGetObjects(ObjectId id, short dxfcode)<br /> {<br />     System.Collections.Generic.List<object> result = <br />         new System.Collections.Generic.List<object>();<br />      ads_name name = new ads_name();<br />     int res = acdbGetAdsName(ref name, id);<br />     ResultBuffer rb = new ResultBuffer();<br />     Autodesk.AutoCAD.Runtime.Interop.AttachUnmanagedObject(<br />         rb, acdbEntGet(ref name), true);<br />     ResultBufferEnumerator iter = rb.GetEnumerator();<br />     while (iter.MoveNext())<br />     {<br />         TypedValue typedValue = (TypedValue)iter.Current;<br />         if (typedValue.TypeCode == dxfcode)<br />         {<br />             result.Add(typedValue.Value);<br />         }<br />     }<br />     return result;<br /> }<br /> private System.Collections.Generic.List<TypedValue> <br />     acdbEntGetTypedVals(ObjectId id)<br /> {<br />     System.Collections.Generic.List<TypedValue> result = <br />         new System.Collections.Generic.List<TypedValue>();<br />     ads_name name = new ads_name();<br />     int res = acdbGetAdsName(ref name, id);<br />     ResultBuffer rb = new ResultBuffer();<br />     Autodesk.AutoCAD.Runtime.Interop.AttachUnmanagedObject(<br />         rb, acdbEntGet(ref name), true);<br />     ResultBufferEnumerator iter = rb.GetEnumerator();<br />     while (iter.MoveNext())<br />     {<br />         result.Add((TypedValue)iter.Current);<br />     }<br />     return result;<br /> }<br />