Ho una variabile RxData As Byte[4] e vorrei salvarla in un file, in modo da aprirlo in seguito e trovarmi il contenuto in un altro array del tipo FileData As Byte[xy].
Se non ho capito male dovrei dapprima convertire Byte[] in uno stream, poi salvare lo stream in un file; solo che in rete c'è tanta documentazione ma nessun esempio, ci sto uscendo pazzo!
Allora, partendo da RxData, come utilizzo la funzione Byte[].Write()?
Come gli indico che l'array di partenza è RxData?
Poi posso salvare lo stream normalmente come nell'esempio?
DIM binaryFile AS File
binaryFile = OPEN "usr.home/test.hex" FOR CREATE
WRITE #binaryFile, Stream
CLOSE #binaryFile
Io farei così.
Se il vettore ha un numero fisso di elementi:
Private RxData[4] As Byte
Public Sub Button1_Click()
Dim binaryFile As File
Dim j As Integer
binaryFile = Open User.Home & "/miofile" For Create
For j = 0 To 3
' come esempio inserisco il valore di j nel mio file:
RxData[j] = j
Write #binaryFile, RxData[j] As Byte ' se non scrivo "As Byte" lo interpreta come stringa, e in questo caso dà errore
Next
Close #binaryFile
End
Se il vettore non ha un numero fisso di elementi:
Private RxData As New Byte[]
Public Sub Button1_Click()
Dim j As Integer
Dim binaryFile As File
For j = 0 To 3
' come esempio inserisco il valore di j nella variabile[]:
RxData.add(j)
Next
End
Public Sub Button2_Click()
Dim j As Integer
binaryFile = Open User.Home & "/miofile" For Create
For j = 0 To 3
Write #binaryFile, RxData[j] As Byte
Next
Close #binaryFile
End
Ma posso utilizzare anche il metodo Write() della variabile vettoriale:
Private RxData As New Byte[]
Public Sub Button1_Click()
Dim j As Integer
For j = 0 To 3
' come esempio inserisco il valore di j nella variabile[]:
RxData.add(j)
Next
End
Public Sub Button2_Click()
Dim binaryFile As File
binaryFile = Open User.Home & "/miofile" For Create
RxData.Write(binaryFile, 0, RxData.Count)
binaryFile.Close
End
In tutti e tre i casi nel file generato ho il seguente risultato:
00 01 02 03