Conoscere via codice il nome di una Struttura

Da Gambas-it.org - Wikipedia.

Per conoscere via codice l'etichetta identificativa di una Struttura partendo dalla sua variabile, si effettuerà una ricerca nella sua area di memoria, puntando alla quale mediante apposito Puntatore:


Mostriamo un semplice esempio pratico valido per un sistema a 64bit:

Public Struct STRUTTURA
  b As Byte
  c As Short
  i As Integer
End Struct


Public Sub Main()

 Dim st As New STRUTTURA
 Dim p1, p2 As Pointer 

' Puntiamo all'oggetto Struttura:
  p1 = Object.Address(st)

  p2 = Pointer@(p1)

  Print "Nome della Struttura: ";; String@(Pointer@(p2 + 24))

End