Mantenere il Form di un'applicazione Gambas sempre in primo piano

Da Gambas-it.org - Wikipedia.

Per mantenere il Form di un'applicazione Gambas sempre in primo piano, ossia sempre attiva e al di sopra di ogni altra finestra aperta, si utilizzerà la Proprietà ".Stacking".
Anche usando tale Proprietà, però la finestra del proprio programma perde il focus, qualora venga aperta la finestra di un altro qualsiasi programma.
Pertanto si dovrà riassegnare il focus al "Form" del nostro programma, rilevandone la perdita con lo specifico Evento "Form_LostFocus()".

Mostriamo un esempio:

Public Sub Form_Activate()

 Me.Stacking = Window.Above

End


Public Sub Form_LostFocus()  ' Se la finestra del programma perde il focus, viene sollevato questo Evento

' Al fine di evitare che il "Form" dell'applicazione perda il focus, qualora venga aperta la finestra di un altro programma, si aggiungerà questa istruzione, la quale riattiva il "Form" garantendogli anche il "focus":
 Desktop.ActiveWindow = Me.Id
 
End