Toggling TopMost dans VB.NET

Question

J'ai un formulaire qui doit être en haut pendant un certain temps, puis peut être placé derrière d'autres fenêtres normalement. Y a-t-il quelque chose en plus à régler Me.TopMost à True ou False qui doit être fait? Je demande parce que ça ne semble pas fonctionner.

Answer 1

Il ne devrait pas présenter de problème. Le code suivant (C#, désolé pour cela, aucun environnement VB.NET disponible où je suis maintenant) définit TopMost à true, attend 5 secondes, puis bascule TopMost Retour à false.

private void MakeMeTopmostForAWhile() 
{ 
    this.TopMost = true; 
    ThreadPool.QueueUserWorkItem(state => 
    { 
     Thread.Sleep(5000); 
     this.Invoke((Action)delegate { this.TopMost = false; }); 
    }); 
} 

Notez que cela n'affecte pas immédiatement l'ordre Z de la fenêtre; Lorsque TopMost est défini sur false, la fenêtre sera toujours au-dessus des autres fenêtres. Si la fenêtre est au-dessus d'une autre fenêtre qui est aussi la plus haute, elle se déplacera pour que l'autre fenêtre la plus haute ne soit pas couverte, mais elle restera au-dessus des autres fenêtres non supérieures.

Mise à jour
Voici le code ci-dessus dans VB.NET (auto-converted, non testé):

Private Sub MakeMeTopmostForAWhile() 
    Me.TopMost = True 
    ThreadPool.QueueUserWorkItem(Function(state) Do 
        Thread.Sleep(5000) 
        Me.Invoke(DirectCast(Function() Do 
            Me.TopMost = False 
        End Function, Action)) 
    End Function) 
End Sub