Scrivere nella console (standard output) di Gambas
Da Gambas-it.org - Wikipedia.
Versione del 13 ago 2014 alle 12:15 di Vuott (Discussione | contributi)
Per scrivere nello standard output di un programma Gambas, ossia in pratica all'interno della console del'IDE di Gambas oppure nel Terminale nel quale sia stato lanciato il nostro programma Gambas a linea di comando, si potranno adottare (come il classico Print) le seguenti modalità che mostreremo nel seguente esempio:
Private fl As File
Private fd As File
Private pts As File
Public Sub Main()
' Viene utilizzata l'istruzione "Open...For Write" in funzione della terza modalità presente nella subroutine "Scrive()".
' Apre il file-device dello "standard output" in scrittura:
fl = Open "/dev/stdout" For Write
' Apre il file-device "/dev/tty" in scrittura:
fl = Open "/dev/tty" For Write
' Apre il file-descriptor dello standard out in scrittura:
fd = Open "/proc/self/fd/1" For Write
' Apre il file-speciale "pts" (che andrà di volta in volta individuato) della console:
pts = Open "/dev/pts/?" For Write
Scrive()
End
Private Procedure Scrive() ' Va a scrivere in console, o nel Terminale in cui il programma è stato lanciato, con 4 modalità
' 1 - Mediante il classico e consueto "Print":
Print "Scrive con il 'Print'\n"
' 2 - Mediante il metodo "File.Save" si diversi file particolari:
File.Save("/dev/stdout", "Scrive con 'File.Save' sul file-device '/dev/stdout' \n")
File.Save("/dev/tty", "Scrive con 'File.Save' sul file-device '/dev/tty' \n")
File.Save("/proc/self/fd/1", "Scrive con 'File.Save' sul file-descriptor dello standard-out\n")
File.Save("/dev/pts/?", "Scrive con 'File.Save' sul file-speciale "pts" (da individuare di volta in volta) della console\n\n")
' 3 - Mediante "Open...For Write" su diversi file particolari:
Write #fl, "Scrive con 'Open... For Write' sul file-device '/dev/stdout'\n"
Write #fl, "Scrive con 'Open... For Write' sul file-device '/dev/tty'\n"
Write #fd, "Scrive con 'Open... For Write' sul file-descriptor dello standard-out\n"
Write #pts, "Scrive con 'Open... For Write' sul file-speciale "pts" (da individuare di volta in volta) della console\n\n"
' 4 - Mediante la funzione "Write" ed il metodo ".Out" della Classe "File":
Write #File.Out, "Scrive con la funzione 'Write' ed il metodo 'File.Out'\n"
End