Differenze tra le versioni di "Scrivere in un file solo alcuni dati presenti in un'area riservata di memoria"
Da Gambas-it.org - Wikipedia.
(Creata pagina con 'Il caso è quello in cui si intende scrivere in un file soltanto alcuni dati contenuti in un'area riservata di memoria e puntata da una variabile di tipo puntatore. Nell'ese...') |
|||
Riga 39: | Riga 39: | ||
<FONT color=gray>' ''...e scriviamo soltanto quattro byte, cominciando dal terzo,'' | <FONT color=gray>' ''...e scriviamo soltanto quattro byte, cominciando dal terzo,'' | ||
' ''dell'area di memoria riservata puntata dalla variabile di tipo "Puntatore":''</font> | ' ''dell'area di memoria riservata puntata dalla variabile di tipo "Puntatore":''</font> | ||
− | Write #fl, p, 4 | + | Write #fl, p, <FONT color=#B22222><B>4</b></font> |
'''End''' | '''End''' |
Versione delle 05:41, 8 nov 2013
Il caso è quello in cui si intende scrivere in un file soltanto alcuni dati contenuti in un'area riservata di memoria e puntata da una variabile di tipo puntatore.
Nell'esempio esplicativo si precederà innanzitutto a scrivere usa serie di dati nell'area riservata di memoria mediante i Memory-Stream. Successivamente si scrivernno nel file, aperto in scrittura, solo 4 byte, partendo dal terzo byte, precedentemente memorizzati nell'area riservata.
Per poter scrivere solo alcuni dati con il comando Write, è necessario aggiungere un terzo elemento alla corrispondente riga di comando:
Write #file, puntatore, n
laddove n rappresenta la quantità di byte, presenti nella variabile puntatore, che dovranno essere scritti nel file.
Esempio:
Public Sub Main() Dim fl As File Dim p As Pointer Dim t As Stream Dim j As Byte ' Allochiamo un'area di memoria pari a dieci byte, ' che sarà puntata da una variabile di tipo "Puntatore": p = Alloc(10) ' Generiamo una variabile di tipo "Stream" dal "Puntatore": t = Memory p For Write ' Scriviamo dieci byte all'interno di quell'area di memoria riservata: For j = 97 To 106 Write #t, j As Byte Next fl = Open "/percorso/del/file" For Write Create ' Spostiamo il puntatore interno al terzo byte dell'area di memoria riservata... Seek #fl, 2 ' ...e scriviamo soltanto quattro byte, cominciando dal terzo, ' dell'area di memoria riservata puntata dalla variabile di tipo "Puntatore": Write #fl, p, 4 End