Passare a una funzione esterna il Puntatore di una Struttura, scritta in Gambas, ottenuto con la funzione VarPtr()

Da Gambas-it.org - Wikipedia.

Se a una funzione esterna si intende passare il Puntatore di una Struttura, scritta in Gambas, ottenuto con la funzione "VarPtr()", anziché direttamente l'istanza della Struttura medesima, bisognerà dichiarare l'Oggetto di tipo della Struttura, da passare, come Globale e usare la parola-chiave "Struct", altrimenti si otterrà l'errore "Tipo dati non supportato ".

Mostriamo un esempio astratto:

Private Extern FunzioneEsterna(p As Pointer) ' Passa un Puntatore anziché l'Oggetto del tipo della Struttura


Public Struct STRUTTURA
  b As Byte
  c As Short
End Struct

Private variabile_struttura As Struct STRUTTURA

Public Sub Main()

 FunzioneEsterna(VarPtr(variabile_struttura))

End