WATCH + File Read( )

Da Gambas-it.org - Wikipedia.

Se con OPEN la parola chiave WATCH viene specificata, il file viene così visto dall'interprete:

  • Se almeno un byte può essere letto dal file, allora l'evento File_Read() viene chiamato;
  • Se almeno un byte può essere scritto nel file, allora l'evento File_Write() viene chiamato.

Esempio: 

' Gambas class file


 varFile As File

Public Sub Form_Open()

 varFile = Open "/percorso/mio_file.xxx" For Read Watch

End


Public Sub File_Read()
 
 Dim by As Byte

 Read #varFile, by

 Print by     '...leggiamo il valore byte ricevuto.
 
End


Public Sub Button1_Click()

 Close #varFile
 
 Me.close

End
Estratto da "http://www.gambas-it.org/wiki/index.php/WATCH_%2B_File_Read%28_%29"