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

Da Gambas-it.org - Wikipedia.
(Creata pagina con 'Per convertire un vettore di tipo Byte[] in un Puntatore, si utilizzerà il metodo ''.Data'' del vettore medesimo. Esempio: '''Public''' Sub Main() Dim b, n As Byte D...')
 
Riga 25: Riga 25:
 
     Print b
 
     Print b
 
   Next
 
   Next
 +
 +
  st.Close
 
   
 
   
 
  '''End'''
 
  '''End'''

Versione delle 18:52, 23 ago 2015

Per convertire un vettore di tipo Byte[] in un Puntatore, si utilizzerà il metodo .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 - derefereziando 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