Convertire un vettore di tipo Byte in un Puntatore

Da Gambas-it.org - Wikipedia.

Per convertire un vettore di tipo Byte[] in un Puntatore, si utilizzerà la Proprietà ".Data" del vettore medesimo. [nota 1]

Esempio:

Public Sub Main()

 Dim b, n As Byte
 Dim bb As New Byte[100]
 Dim p As Pointer
 Dim st As Stream

 For b = 0 To 99
   bb[b] = b + 1
 Next

 p = bb.Data
  
' Come verifica del risultato, riotteniamo - dereferenziando il Puntatore - i valori immessi nel vettore:
 st = Memory p For Read

 For n = 0 To 99
   Read #st, b
   Print b
 Next

 st.Close

End


Note