Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS

CodeS-SourceS est hébergé par Frontier.fr

Cliquez ici pour mettre ce site au démarrage de votre navigateur

AccueilCodesTutorielsForumsEmploiLivresConnexion

begin process at 2009 01 08 08:22:15

3 ARTICLES SUR SQL SERVER (DATA STRUCTURES, SCANS AND SEEKS, DATA ACCESS STRATEGIES) par RaptorXP

MAIS QUE PEUT BIEN FAIRE UN MVP QUAND IL NE CODE PAS ??? par sebmafate

POWERSHELL : COMMENT EXéCUTER UN SCRIPT PS DEPUIS UNE FENêTRE MS DOS OU SCHEDULED TASK par ROMELARD Fabrice

EDM DESIGNER par Matthieu MEZIL

SMALL BASIC - UN PROJET INTéRESSANT par pierrick

BLOCAGE SOUS VBA par Potard

RE : POURQUOI ISEMPTY(VBEMPTY) RENVOI FALSE ??? par Renfield

RE : COLLECTION par Orohena

REMPLIR DATAGRID EN 2 TABLE VB.NET par tdi2a

+ de logiciels à télécharger

1 329 734 membres
81 nouveaux aujourd'hui
14 640 membres club

Trouver une ressource

Trouvez une ressource parmi 39 269 codes, 1 222 805 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

SAVOIR SI UNE FENÊTRE EST AFFICHÉE OU CACHÉE(MISE DANS LA BARRE EN BAS)

Information sur la source

Catégorie :Formulaire Niveau : Débutant Date de création : 14/06/2004 Date de mise à jour : 25/03/2005 08:47:16 Vu : 2 332

Auteur : jrbleboss

Ecrire un message privé

Note :

1,00 / 10

Commentaire sur cette source (5)

Ajouter un commentaire et/ou une note

Description

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

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

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.

Historique

25 mars 2005 08:47:19 :

Sources du même auteur

PARCOURS DE LA SOURIS

TABLEAU HTML

APPLICATION CONSOLE

SUPPRIMER TOUT LES FICHIER PAR LEUR EXTENSION SUR OUT LES SU...

CONVERTIR UN FICHIER CVS DANS EXCEL

Toutes les sources de jrbleboss

Sources de la même categorie

LOGICIEL BONS DE TRAVAUX par gnieark

AFFICHER UNE IMAGE DANS UNE CELLULE D'UN DATAGRIDVIEW LIÉ À ... par christcnet

FORM AVEC BOUTONS DYNAMIQUES SOUS VB6 par mimiZanzan

DÉTECTER L'APPARIATION DES SCROLLBARS DANS UN SCROLLABLECONT... par ShareVB

AJOUTER N'IMPORTE QUEL RACCOURCI À VOS MENUS (HOOK CLAVIER) par violent_ken

Toutes les sources de la catégorie Formulaire

Commentaires et avis

Commentaire de Renfield le 14/06/2004 20:55:37 administrateur CS

un MsgBox dans un timer ? interessant... faut aimer cliquer ;)

en VB, on peut se contenter de :

If Me.WindowState = VbMinimized Then.......

Commentaire de Ce.plusplus le 15/06/2004 02:55:09

lol

Commentaire de kehops le 15/06/2004 16:43:00

kler!, d'ailleurs y a une personne qui ta noté 1 (comme quand ta fenêtre est cachée) lol

Commentaire de jrbleboss le 15/06/2004 18:51:49

Salut avec ce code vous pouvez savoir si n'importe quel fenetre est caché ou affichée

Commentaire de Renfield le 15/06/2004 20:21:04 administrateur CS

oui, en remplacant Me.hWnd par le handle de la fenetre considerée...

disons que l'API est deja connue, a la base, et que le couple Timer + MsgBox n'est pas forcément le plus indiqué....