Conoscere le risorse formali contenute da un oggetto della Classe ShapeItem

Per conoscere quali siano le risorse (simboli) possedute da un Oggetto appartenente alla Classe nascosta _ShapeItem del Componente gb.map, lo si può analizzare in quanto "Oggetto".

Nell'esempio seguente si verificheranno i simboli appartenenti all'oggetto di tipo _ShapeItem restituito dal Metodo ".AddPoint( )":

Public Sub Form_Open()
 
 Dim ob As Object
 Dim cl As Class
 Dim s As String
 
' Ottiene la variabile generica di tipo "Object" dall'oggetto di tipo "_ShapeItem".
' In questo modo l'oggetto della Classe nascosta di tipo "_ShapeItem" può essere puntato da una variabile.
 ob = MapView1.Map.AddShape(Null).AddPoint(Null, Null)
 
' Ottiene la variabile generica di tipo "Class" dalla variabile di tipo "Object":
 cl = Object.Class(ob)
 
' Stampa in console tutti i simboli posseduti dall'oggetto di tipo "_ShapeItem":
 For Each s In it.Symbols
    Print s
 Next
 
End