Filtro para datos extendidos

AutoCAD ActiveX

 
Filtro para datos extendidos
 
 
 

Se pueden utilizar aplicaciones externas para asociar datos tales como cadenas de texto, valores numéricos, puntos 3D, distancias y nombres de capa a objetos de AutoCAD. Estos son los denominados datos extendidos o datoseX. Se pueden crear filtros de entidades que contengan datos extendidos de una aplicación específica.

Para obtener más información acerca de los datos extendidos, véase Filtro para datos extendidos.

Selección de círculos que contienen datos extendidos

En el siguiente ejemplo, se filtran los círculos que contienen datos extendidos procedentes de la aplicación “MI_APL”.

Sub Ch4_FilterXdata()
   Dim sstext As AcadSelectionSet
   Dim mode As Integer
   Dim pointsArray(0 To 11) As Double
   mode = acSelectionSetWindowPolygon
   pointsArray(0) = -12#: pointsArray(1) = -7#: pointsArray(2) = 0
   pointsArray(3) = -12#: pointsArray(4) = 10#: pointsArray(5) = 0
   pointsArray(6) = 10#: pointsArray(7) = 10#: pointsArray(8) = 0
   pointsArray(9) = 10#: pointsArray(10) = -7#: pointsArray(11) = 0
   Dim FilterType(1) As Integer
   Dim FilterData(1) As Variant
   Set sstext = ThisDrawing.SelectionSets.Add("SS9")
   FilterType(0) = 0
   FilterData(0) = "Circle"
   FilterType(1) = 1001
   FilterData(1) = "MI_APL"
   sstext.SelectByPolygon mode, pointsArray, FilterType, FilterData
End Sub