Differenze tra le versioni di "Passare in runtime il numero del file-device 'pts' di un Terminale"
Da Gambas-it.org - Wikipedia.
Riga 1: | Riga 1: | ||
− | Il caso è quello in cui si deve passare | + | Il caso è quello in cui si deve passare al programma Gambas ''a linea di comando'', mentre sta funzionndo, il numero identificatore di un Terminale aperto. |[[#Note|1]]| |
Per fare ciò si utilizzerà il file device dello ''standard input'' con la proprietà ''.In'' della Classe ''File'': | Per fare ciò si utilizzerà il file device dello ''standard input'' con la proprietà ''.In'' della Classe ''File'': | ||
Riga 19: | Riga 19: | ||
'''End''' | '''End''' | ||
+ | |||
+ | |||
+ | |||
+ | =Note= | ||
+ | [1] Ovviamente con il codice esposto in questa pagina è possibile passare al programma Gambas ''a linea di comando'' dal Terminale, ove esso è stato lanciato, qualunque dato in formato stringa di caratteri. |
Versione delle 08:21, 14 ago 2014
Il caso è quello in cui si deve passare al programma Gambas a linea di comando, mentre sta funzionndo, il numero identificatore di un Terminale aperto. |1|
Per fare ciò si utilizzerà il file device dello standard input con la proprietà .In della Classe File:
Public Sub Main() Dim fl As File Dim s As String ' Esegue il ciclo, finché non sarà stato inviato dal Terminale al programma Gambas un carattere tramite la tastiera: While IsNull(s) ' Intercetta quanto scritto nel Terminale, ove è stato lanciato il programma Gambas: Input #File.In, s fl = Open "/dev/pts" &/ s For Output ' Ricevuto quanto scritto nel Terminale, lo mostra nuovamente con aggiunta di altro testo nel Terminale medesimo: Print #fl, "Numero file 'pts' = " & s Wend fl.Close End
Note
[1] Ovviamente con il codice esposto in questa pagina è possibile passare al programma Gambas a linea di comando dal Terminale, ove esso è stato lanciato, qualunque dato in formato stringa di caratteri.