Differenze tra le versioni di "Convertire un vettore di tipo Byte in un Puntatore"

Da Gambas-it.org - Wikipedia.
Riga 13: Riga 13:
 
   Next
 
   Next
 
   
 
   
   p = <FONT Color=#B22222>bb.Data</font>
+
   <FONT Color=green><B>p</b></font> = <FONT Color=#B22222><B>bb.Data</b></font>
 
    
 
    
 
  <FONT Color=gray>' ''Come verifica del risultato, riotteniamo - dereferenziando il Puntatore - i valori immessi nel vettore:''</font>
 
  <FONT Color=gray>' ''Come verifica del risultato, riotteniamo - dereferenziando il Puntatore - i valori immessi nel vettore:''</font>

Versione delle 20:12, 20 ago 2022

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

  • Vedere anche le seguenti pagine:

- Assegnare un vettore ad un Puntatore
- Ottenere il puntatore di una variabile vettoriale