Differenze tra le versioni di "Individuare l'ID di un Balloon"
(2 versioni intermedie di uno stesso utente non sono mostrate) | |||
Riga 1: | Riga 1: | ||
− | Anche il ''Balloon'' è una finestra, e come tale possiede un proprio | + | Anche il ''Balloon'' è una finestra, e come tale possiede un proprio numero identificativo (ID), che potrà essere individuato con le sole funzioni di Gambas adottando adottare almeno un paio di modalità. |
+ | Se si intende ottenere l'ID del "Balloon" immediatamente dopo la sua apertura, allora si farà riferimento all'ultimo numero di "indice", il quale è relativo appunto alla finestra del "Balloon", essendo stata ovviamente l'ultima in ordine di apparizione: | ||
− | + | ====1° esempio==== | |
− | Public Sub | + | In questo esempio è necessario attivare anche il Componente ''gb.desktop'': |
+ | Public Sub Button1_Enter() | ||
+ | Balloon.Info("Testo qualsiasi", Button1) | ||
+ | Wait 1 | ||
Print Hex(Desktop.Windows[Desktop.Windows.Count - 1].Id) | Print Hex(Desktop.Windows[Desktop.Windows.Count - 1].Id) | ||
End | End | ||
− | + | ====2° esempio==== | |
− | + | Qui si farà uso anche della Classe ''DesktopWindows''; pertanto si dovrà attivare anche il Componente ''gb.desktop.x11''. | |
<BR>Poiché la finestra del "Balloon" non possiede un nome, allora, per individuare questa finestra, si farà riferimento a tale circostanza: | <BR>Poiché la finestra del "Balloon" non possiede un nome, allora, per individuare questa finestra, si farà riferimento a tale circostanza: | ||
− | Public Sub | + | Public Sub Button1_Enter() |
Dim dw As DesktopWindow | Dim dw As DesktopWindow | ||
− | + | ||
+ | Balloon.Info("Testo qualsiasi", Button1) | ||
+ | Wait 1 | ||
+ | |||
For Each dw In Desktop.Windows | For Each dw In Desktop.Windows | ||
If IsNull(dw.Name) Then dw = New DesktopWindow(dw.Id) | If IsNull(dw.Name) Then dw = New DesktopWindow(dw.Id) |
Versione attuale delle 17:20, 31 mag 2024
Anche il Balloon è una finestra, e come tale possiede un proprio numero identificativo (ID), che potrà essere individuato con le sole funzioni di Gambas adottando adottare almeno un paio di modalità.
Se si intende ottenere l'ID del "Balloon" immediatamente dopo la sua apertura, allora si farà riferimento all'ultimo numero di "indice", il quale è relativo appunto alla finestra del "Balloon", essendo stata ovviamente l'ultima in ordine di apparizione:
1° esempio
In questo esempio è necessario attivare anche il Componente gb.desktop:
Public Sub Button1_Enter() Balloon.Info("Testo qualsiasi", Button1) Wait 1 Print Hex(Desktop.Windows[Desktop.Windows.Count - 1].Id) End
2° esempio
Qui si farà uso anche della Classe DesktopWindows; pertanto si dovrà attivare anche il Componente gb.desktop.x11.
Poiché la finestra del "Balloon" non possiede un nome, allora, per individuare questa finestra, si farà riferimento a tale circostanza:
Public Sub Button1_Enter() Dim dw As DesktopWindow Balloon.Info("Testo qualsiasi", Button1) Wait 1 For Each dw In Desktop.Windows If IsNull(dw.Name) Then dw = New DesktopWindow(dw.Id) Next Print Hex(dw.Id) End