Differenze tra le versioni di "Assegnare i valori di un file ad una Struttura mediante un Puntatore"
Da Gambas-it.org - Wikipedia.
Riga 6: | Riga 6: | ||
Public Struct STRUTTURA | Public Struct STRUTTURA | ||
b As Byte | b As Byte | ||
− | + | c As Short | |
i As Integer | i As Integer | ||
End Struct | End Struct | ||
Riga 30: | Riga 30: | ||
With stru | With stru | ||
Print .b | Print .b | ||
− | Print . | + | Print .c |
Print .i | Print .i | ||
End With | End With |
Versione delle 15:27, 10 set 2022
E' possibile assegnare direttamente uno o più valori, contenuti da un file, ai membri di una Struttura attraverso la proprietà .Data delle variabili vettoriali.
Mostriamo un semplice esempio, nel quale si suppone si abbia un file contenente i seguenti valori esadecimali: 09 E7 03 9F 86 01 00, corrispondenti ad un Byte, ad uno Intero-Corto e ad un Intero.
Ne riproduciamo, quindi, nel codice la Struttura che dovrà poi contenere tali dati.
Public Struct STRUTTURA b As Byte c As Short i As Integer End Struct Public Sub Main() Dim stru As New STRUTTURA Dim fl As File Dim bb As Byte[] fl = Open "/percorso/del/file/da/leggere" With bb = New Byte[Lof(fl)] ' Leggiamo il file e carichiamo i suoi dati nella variabile vettoriale di tipo "Byte[]": .Read(fl, 0, .Count) ' In questo esempio siamo costretti a tenere conto del necessario "allineamento" naturale del dato relativo al membro di tipo "Short" della Struttura, aggiungendo un byte vuoto dopo il primo valore, ossia dopo quello corrispondente al membro di tipo Byte: .Add(0, 1) ' L'assegnazione diretta dei dati dalla variabile vettoriale alla variabile di tipo "Struttura", da noi creata, avviene semplicemente l'assegnazione dell'indirizzo di memoria (Puntatore) dei dati contenuti dalla variabile vettoriale di tipo "Byte[]" ritornato dalla proprietà ".Data" di tale vettore: stru = .Data End With With stru Print .b Print .c Print .i End With fl.Close End