Differenze tra le versioni di "Lof"

Da Gambas-it.org - Wikipedia.
 
Riga 4: Riga 4:
 
  lughezzaFile = Lof(file)
 
  lughezzaFile = Lof(file)
 
Esempio:
 
Esempio:
  '''Public''' Sub Main()
+
  Public Sub Main()
 
   
 
   
 
   Dim fl As File
 
   Dim fl As File
 
   
 
   
   fl = Open "<FONT Color=gray>''/percorso/del/file''</font>" For Read
+
   fl = Open "<FONT Color=darkgreen>''/percorso/del/file''</font>" For Read
 
   
 
   
 
   Print "La lunghezza del file è: "; <FONT Color=#B22222>Lof</font>(fl)
 
   Print "La lunghezza del file è: "; <FONT Color=#B22222>Lof</font>(fl)
Riga 14: Riga 14:
 
   fl.Close
 
   fl.Close
 
   
 
   
  '''End'''
+
  End
  
 
===Uso di "Lof()" con una variabile di tipo "Process"===
 
===Uso di "Lof()" con una variabile di tipo "Process"===
Riga 22: Riga 22:
 
  ......
 
  ......
 
   
 
   
  '''Public''' Sub Processo_Read()
+
  Public Sub Processo_Read()
 
   
 
   
 
   Dim b As String
 
   Dim b As String
Riga 28: Riga 28:
 
   Read #pro, b, <FONT Color=#B22222>Lof</font>(Last)
 
   Read #pro, b, <FONT Color=#B22222>Lof</font>(Last)
 
   
 
   
  '''End'''
+
  End

Versione attuale delle 14:48, 10 giu 2024

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)

 fl.Close

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