Differenze tra le versioni di "Output To"

Da Gambas-it.org - Wikipedia.
 
Riga 4: Riga 4:
  
 
Nell'esempio seguente la scrittura del testo, contenuto dalla variabile di tipo ''Stringa'', sarà reindirizzato dalla console/terminale verso un file.
 
Nell'esempio seguente la scrittura del testo, contenuto dalla variabile di tipo ''Stringa'', sarà reindirizzato dalla console/terminale verso un file.
  '''Public''' Sub Main()
+
  Public Sub Main()
 
   
 
   
 
   Dim fl As File
 
   Dim fl As File
Riga 11: Riga 11:
 
   s = "testo qualsiasi"
 
   s = "testo qualsiasi"
 
   
 
   
   fl = Open "<FONT color=gray>''/percorso/del/file/da/scrivere''</font>" For Create
+
   fl = Open "<FONT color=darkgreen>''/percorso/del/file/da/scrivere''</font>" For Create
 
   
 
   
  <FONT color=#006400>' ''Si impone che il flusso di dati sarà reindirizzato dalla console/terminale al file "fl":''</font>
+
  <FONT color=gray>' ''Si impone che il flusso di dati sarà reindirizzato dalla console/terminale al file "fl":''</font>
 
   <FONT color=#B22222>Output To</font> #fl
 
   <FONT color=#B22222>Output To</font> #fl
 
   
 
   
  <FONT color=#006400>' ''Quindi l'istruzione "Print" scrive nel file "fl", anziché, come sarebbe qui previsto, nella console:''</font>
+
  <FONT color=gray>' ''Quindi l'istruzione "Print" scrive nel file "fl", anziché, come sarebbe qui previsto, nella console:''</font>
 
   Print s
 
   Print s
 
   
 
   
 
   fl.Close
 
   fl.Close
 
   
 
   
  '''End'''
+
  End
 
In quest'altro esempio leggiamo da un file, contenente un valore di tipo ''Long'', e creiamo un nuovo file, nel quale scriveremo quanto letto dal primo file:
 
In quest'altro esempio leggiamo da un file, contenente un valore di tipo ''Long'', e creiamo un nuovo file, nel quale scriveremo quanto letto dal primo file:
  '''Public''' Sub Main()
+
  Public Sub Main()
 
   
 
   
 
   Dim st, fl As File
 
   Dim st, fl As File
 
   Dim l As Long
 
   Dim l As Long
 
    
 
    
   st = Open "<FONT color=gray>''/percorso/del/file/da/leggere''</font>" For Read
+
   st = Open "<FONT color=darkgreen>''/percorso/del/file/da/leggere''</font>" For Read
 
   
 
   
   fl = Open "<FONT color=gray>''/percorso/del/file/da/scrivere''</font>" For Create
+
   fl = Open "<FONT color=darkgreen>''/percorso/del/file/da/scrivere''</font>" For Create
 
   
 
   
  <FONT color=#006400>' ''Legge il valore di tipo "Long":''</font>
+
  <FONT color=gray>' ''Legge il valore di tipo "Long":''</font>
 
   Read #st, l
 
   Read #st, l
 
   
 
   
  <FONT color=#006400>' ''Si impone che il flusso di dati sarà reindirizzato dalla console al file "fl":''</font>
+
  <FONT color=gray>' ''Si impone che il flusso di dati sarà reindirizzato dalla console al file "fl":''</font>
 
   <FONT color=#B22222>Output To</font> #fl
 
   <FONT color=#B22222>Output To</font> #fl
 
   
 
   
  <FONT color=#006400>' ''Quindi l'istruzione "Write" scrive nel file "fl", anziché, come sarebbe qui previsto, nella console:''</font>
+
  <FONT color=gray>' ''Quindi l'istruzione "Write" scrive nel file "fl", anziché, come sarebbe qui previsto, nella console:''</font>
 
   Write l As Long
 
   Write l As Long
 
   
 
   
Riga 44: Riga 44:
 
   st.Close
 
   st.Close
 
   
 
   
  '''End'''
+
  End
 
La stampa del risultato non avverrà più in console/terminale, ma i dati saranno rediretti nella variabile "fl" che punta al file da scrivere. <SUP>&#091;[[#Note|nota 1]]&#093;</sup>
 
La stampa del risultato non avverrà più in console/terminale, ma i dati saranno rediretti nella variabile "fl" che punta al file da scrivere. <SUP>&#091;[[#Note|nota 1]]&#093;</sup>
  

Versione attuale delle 14:53, 10 giu 2024

L'istruzione Output To redirige l'uscita, ossia lo standard output, predefinita in un altro flusso.

L'uscita predefinita viene usata da PRINT e WRITE, quando non gli vengono specificati argomenti specifici.

Nell'esempio seguente la scrittura del testo, contenuto dalla variabile di tipo Stringa, sarà reindirizzato dalla console/terminale verso un file.

Public Sub Main()

 Dim fl As File
 Dim s As String

 s = "testo qualsiasi"

 fl = Open "/percorso/del/file/da/scrivere" For Create

' Si impone che il flusso di dati sarà reindirizzato dalla console/terminale al file "fl":
 Output To #fl

' Quindi l'istruzione "Print" scrive nel file "fl", anziché, come sarebbe qui previsto, nella console:
 Print s

 fl.Close

End

In quest'altro esempio leggiamo da un file, contenente un valore di tipo Long, e creiamo un nuovo file, nel quale scriveremo quanto letto dal primo file:

Public Sub Main()

 Dim st, fl As File
 Dim l As Long
 
 st = Open "/percorso/del/file/da/leggere" For Read

 fl = Open "/percorso/del/file/da/scrivere" For Create

' Legge il valore di tipo "Long":
 Read #st, l

' Si impone che il flusso di dati sarà reindirizzato dalla console al file "fl":
 Output To #fl

' Quindi l'istruzione "Write" scrive nel file "fl", anziché, come sarebbe qui previsto, nella console:
 Write l As Long

 fl.Close
 st.Close

End

La stampa del risultato non avverrà più in console/terminale, ma i dati saranno rediretti nella variabile "fl" che punta al file da scrivere. [nota 1]


Note

[1] Un esempio pratico può essere visto in questa pagina: Indirizzare dati ad un Terminale ed alla Console dell'IDE di Gambas.


Riferimenti