Differenze tra le versioni di "Lof"

Da Gambas-it.org - Wikipedia.
Riga 6: Riga 6:
  
 
Esempio:
 
Esempio:
  '''Public''' Sub Button1_Click()
+
  '''Public''' Sub Main()
 
   
 
   
 
   Dim fl As File
 
   Dim fl As File
 
   
 
   
  fl = Open "''/percorso/del/file''" For Read
+
  fl = Open "<FONT Color=gray>''/percorso/del/file''</font>" For Read
 
   
 
   
  Print "La lunghezza del file è: "; Lof(fl)
+
  Print "La lunghezza del file è: "; Lof(fl)
 
   
 
   
 
  '''End'''
 
  '''End'''
  
 
+
===Uso di "Lof()" con una variabile di tipo "Process"===
Se il flusso non è un file, bensì un processo, allora la funzione ''Lof'' restituisce il numero di byte che possono essere letti con una sola volta:
+
Se il flusso non è un file, bensì un processo, allora la funzione "Lof()" restituisce il numero di byte che possono essere letti con una sola volta:
  '''Public''' Sub processo_Read()
+
Private pro As Process
 +
 +
......
 +
 +
  '''Public''' Sub Processo_Read()
 
   
 
   
 
   Dim b As String
 
   Dim b As String
 
   
 
   
  Read #Last, b, Lof(Last)
+
  Read #pro, b, Lof(Last)
 
   
 
   
 
  '''End'''
 
  '''End'''

Versione delle 02:29, 2 set 2022

La funzione Lof restituisce un valore di tipo Long che rappresenta la lunghezza (ossia la quantità di byte) di un file aperto.

La sintassi è:

lughezzaFile = Lof(file)


Esempio:

Public Sub Main()

 Dim fl As File

 fl = Open "/percorso/del/file" For Read

 Print "La lunghezza del file è: "; Lof(fl)

End

Uso di "Lof()" con una variabile di tipo "Process"

Se il flusso non è un file, bensì un processo, allora la funzione "Lof()" restituisce il numero di byte che possono essere letti con una sola volta:

Private pro As Process

......

Public Sub Processo_Read()

 Dim b As String

 Read #pro, b, Lof(Last)

End