Output To: differenze tra le versioni

Da Gambas-it.org - Wikipedia.
Vai alla navigazione Vai alla ricerca
Nessun oggetto della modifica
Nessun oggetto della modifica
 
(16 versioni intermedie di uno stesso utente non sono mostrate)
Riga 1: Riga 1:
'''Output To''' redirige l'uscita, ossia lo ''standard output'', predefinita in un altro flusso.
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.
L'uscita predefinita viene usata da PRINT e WRITE, quando non gli vengono specificati argomenti specifici.


'''Public''' Sub Button1_Click()
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 st, f As Stream
  Dim fl As File
Dim b As Byte
  Dim s As String
   
   
   Line Input #st, b
   s = "testo qualsiasi"
   
   
   <FONT color=#B22222>Output To</font> #f
   fl = Open "<FONT color=darkgreen>''/percorso/del/file/da/scrivere''</font>" For Create
   
   
   Print "b = "; b
<FONT color=gray>' ''Si impone che il flusso di dati sarà reindirizzato dalla console/terminale al file "fl":''</font>
   <FONT color=red>Output To</font> #fl
   
   
  '''End'''
  <FONT color=gray>' ''Quindi l'istruzione "Print" scrive nel file "fl", anziché, come sarebbe qui previsto, nella console:''</font>
  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 "<FONT color=darkgreen>''/percorso/del/file/da/leggere''</font>" For Read
  fl = Open "<FONT color=darkgreen>''/percorso/del/file/da/scrivere''</font>" For Create
<FONT color=gray>' ''Legge il valore di tipo "Long":''</font>
  Read #st, l
<FONT color=gray>' ''Si impone che il flusso di dati sarà reindirizzato dalla console al file "fl":''</font>
  <FONT color=red>Output To</font> #fl
<FONT color=gray>' ''Quindi l'istruzione "Write" scrive nel file "fl", anziché, come sarebbe qui previsto, nella console:''</font>
  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. <SUP>&#091;[[#Note|nota 1]]&#093;</sup>


La stampa del risultato non avverà più in console, ma i dati saranno rediretti nella variabile di tipo Stream: " f ". |[[#Note|1]]| |[[#Note|2]]|


=Note=
[1] Vedere anche queste pagine:
* [[Reindirizzare lo standard output con Output To]]
* [[Indirizzare dati ad un Terminale ed alla Console dell'IDE di Gambas]]




==Note==
[1] Si può ottenere il medesimo risultato operando più direttamente:
......
Line Input #st, b
Print #f, b


[2] Un esempio pratico può essere visto in questa [[Indirizzare_dati_ad_un_Terminale%2C_e_poi_dal_Terminale_alla_Console_dell%27IDE_di_Gambas|pagina]] della Guide della Comunità del Forum di Gambas-it.org.
=Riferimenti=
* https://gambaswiki.org/wiki/lang/outputto?l=it

Versione attuale delle 05:33, 2 ott 2025

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] Vedere anche queste pagine:


Riferimenti