Savoir si une fenêtre est affichée ou cachée(mise dans la barre en bas)

Commenter

Contenu du snippet

Dans ce code il y a une API qui sert a savoir si une fenêtre(n'importe la quelle tant que l'on connait le handle) est cachée ou affichée. Dans l'exemple il faut créer un timer et mettre le code. Pour que vous ayez le temps de la réduire ou de l'afficher (la form) mettez le timer à 2000.

Source / Exemple : 


Private Declare Function IsIconic Lib "user32" ( ByVal hwnd As Long) As Long

Private Sub connaitre()
    Dim rep As Integer
    rep = IsIconic(Me.hwnd)
    If (rep <> 1) Then '  1 si la fenêtre est cachée
        MsgBox "La fenêtre n'est pas cachée", , ""
    Else'                        0 si elle est affichée
        MsgBox "Le fenêtre est cachée", , ""
    End If
End Sub

Conclusion :


ça marche sous NT qu'a partir de 3.1.

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (jrbleboss)