Differenze tra le versioni di "Uso della classe Application"

Da Gambas-it.org - Wikipedia.
Riga 62: Riga 62:
 
   
 
   
 
   With Application
 
   With Application
     a = .Args[1]
+
     a = Val(.Args[1])
     b = .Args[2]
+
     b = Val(.Args[2])
 
   End With
 
   End With
 
   
 
   

Versione delle 02:26, 30 ott 2013

La Classe statica Application offre informazioni generali sull'applicazione .gambas mediante le seguenti sue proprietà:


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 = Val(.Args[1])
    b = Val(.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 .


Questo metodo risulta essere molto utile in particolare, qualora il programma .gambas sia stato realizzato con impostazione a linea di comando, quindi senza supporto grafico, ed al quale sia previsto il passaggio di uno o più parametri stringa.
Poniamo ad esempio che il programma .gambas a linea di comando venga lanciato da Terminale. Nel caso in cui il codice Gambas prevede che venga passato un solo parametro stringa:

Public Sub Main()

 Print Application.Args[1]

End

se la stringa è formata da un'unica parola, allora sarà sufficiente lanciare il programma .gambas da Terminale nel modo seguente:

 ~ $ /percorso/del/programma.gambas parametro

nel caso in cui, invece, la stringa da passare è formata da più parole separate fra loro da uno spazio, allora l'intero parametro stringa dovrà essere posto fra virgolette:

~ $ /percorso/del/programma.gambas "parametro stringa"

altrimenti verrà passata solo la prima parola.

Qualora il codice del programma .gambas prevede il passaggio di due o più parametri stringa, valgono le regole viste sopra: se il parametro è formato da una stringa priva di spazi, non è necessario che esso sia posto fra virgolette; se invece il parametro è formato da due o più caratteri separati dallo spazio, allora il parametro va passato all'interno delle virgolette.
Vediamo un esempio nel quale il codice Gambas prevede il passaggio di due parametri:

Public Sub Main()

 With application
   Print .Args[1], .Args[2]
 End With

End

e da Terminale si passino due parametri: uno composto da un'unica parola, ed un altro composto da due parole separate dallo spazio:

~ $ /percorso/del/programma.gambas unicaparola "due parole"


Busy

Daemon

Impostare questa proprietà su True per rendere il programma un demone.

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.


Dir

La proprietà Dir restituisce la directory di lavoro di Gambas, cioè la directory da cui è stato lanciato il programma Gambas.

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

Ritorna od imposta la finestra principale dell'applicazione.

La sintassi è:

Application.MainWindow As Window

Nella fase iniziale tale proprietà ritorna Null. E' possibile assegnare qualche Window successivamente durante l'esecuzione dell'applicazione.

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


Priority

ShowTooltips

La proprietà ShowTooltips ritorna o imposta un valore booleano che rappresenta se i tooltip sono visibili o meno.

La sintassi è:

Application.ShowTooltips As Boolean


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.