Individuare l'ID di un Balloon

Da Gambas-it.org - Wikipedia.

Anche il Balloon è una finestra, e come tale possiede un proprio ID. Per individuare tale numero identificativo (ID) con le sole funzioni di Gambas potremo adottare almeno un paio di modalità.


I seguenti algoritmi, utilizzando la classe Desktop, richiedono che sia attivato anche il componente gb.desktop.


1 - 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:

Public Sub Button1_Click()

  Print Desktop.Windows[Desktop.Windows.Count - 1].Id

End


2 - Qui si farà uso anche della Classe DesktopWindows. Poiché la finestra del "Balloon" non possiede un nome, allora, per individuare questa finestra, si farà riferimento a tale circostanza:

Public Sub Button1_Click()

 Dim dw As DesktopWindow
 
 
 For Each dw In Desktop.Windows
   If dw.Name = Null Then dw = New DesktopWindow(dw.Id)
 Next

   Print dw.Id
 
End