Convertire un vettore di tipo Byte in un Puntatore
Da Gambas-it.org - Wikipedia.
Versione del 3 nov 2021 alle 19:48 di Vuott (Discussione | contributi)
Per convertire un vettore di tipo Byte[] in un Puntatore, si utilizzerà la Proprietà ".Data" del vettore medesimo.
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