Uso della classe Application
La Classe statica Application offre informazioni generali sull'applicazione .gambas mediante le seguenti sue proprietà:
Indice
ActiveControl
La proprietà ActiveControl ritorna il controllo che posiede in quel momento il focus. Di quell'oggetto è possibile conoscere o anche impostare contemporaneamente ogni relativa proprietà associata all'oggetto medesimo.
Esempio:
Public Sub Form_Open()
Button1.Setfocus
End
Public Sub Button1_Click()
With Application.ActiveControl
Print .Name
Print .Id
.Background = Color.Red
End With
End
ActiveWindow
La proprietà ActiveWindow ritorna la finestra attiva corrente, vale a dire la finestra che possiede il controllo con lo stato attivo. Di quella finestra attiva è possibile conoscere o anche impostare contemporaneamente ogni relativa proprietà associata alla finestra medesima.
Esempio:
Public Sub Button1_Click()
Dim w As Window
w = Application.ActiveWindow
With w
Print .Id, Hex(.Id)
Print .Name
Print .Title
.Background = Color.Yellow
.Move(400, 500, 100, 200)
End With
End
Args
La proprietà Args ritorna un array che contiene i valori passati all'applicazione da un altro programma mediante il comando Shell.
Quando il codice di un programma principale lancia un'applicazione.gambas passandole dei dati, la proprietà Args consente a tale applicazione, lanciata, di intercettare tali dati.
Il primo elemento dell'array, numero di indice zero [0], è sempre il nome del programma.gambas. Il numero degli elementi è minimo 1 sino al numero degli argomenti passati dal comando Shell .
La sintassi è:
array = Application.Args
Esempio:
Public Sub Form_Open()
Dim a, b As Byte
With Application
a = .Args[1]
b = .Args[2]
End With
TextBox1.Text = CStr(a * b)
End
Se il programma.gambas non riceve parametri dal comando del terminale che l'ha lanciata, il numero degli argomenti passati dalla linea di comando è pari ad 1, con numero di indice zero [0], che - come già detto - rappresenta sempre il nome del programma.gambas lanciato da Shell .
Quando il programma diventa un demone:
- invoca la chiamata di sistema fork, e termina il genitore appena creato, in modo che il genitore reale del programma non attende la sua chiusura;
- La directory di lavoro corrente è impostata su "/" ;
- Lo standard input, standard output e standard error sono chiusi;
- Non è più possibile impostare questa proprietà su False.
Busy
Daemon
Impostare questa proprietà su True per rendere il programma un demone.
Dir
La proprietà Dir restituisce la directory di lavoro dell'applicazione.
Se per esempio l'applicazione programma.gambas è posta in una cartella, che chiameremo mieiprogrammi, della Home:
Print Application.Dir
si avrà in console:
/home/mieiprogrammi
Embedder
Env
Restituisce una collezione virtuale di stringhe contenente le variabili d'ambiente del processo.
Esempio:
Public Sub Button1_Click() Print Application.Env["PATH"] End
Font
La proprietà Font restituisce o modifica il tipo di carattere predefinito globale dell'applicazione.
Handle
La proprietà Handle ritorna un integer che rappresenta il PID del processo del programma.
Id
La proprietà Id è un sinonimo della proprietà Handle.
MainWindow
Name
La proprietà Name ritorna il nome dell'applicazione come definita come definita nella finestra di dialogo delle proprietà dell'IDE di Gambas.
Path
La proprietà Path restiruisce il percorso ove è locata l'applicazione, compreso il nome dell'applicazione stessa.
Se per esempio l'applicazione programma.gambas è posta in una cartella, che chiameremo mieiprogrammi, della Home:
Print Application.Path
si avrà in console:
/home/mieiprogrammi/programma.gambas
ShowTooltips
La proprietà ShowTooltips ritorna o imposta un valore booleano che rappresenta se i tooltip sono visibili o meno.
Startup
Theme
Title
La proprietà Title restituisce il titolo dell'applicazione in esecuzione.
Version
La proprietà Version ritorna una stringa che rapresenta il numero della versione dell'applicazione, come definita nella finestra di dialogo delle proprietà dell'IDE di Gambas.
