begin process at 2008 09 05 07:55:47
1 237 091 membres
57 nouveaux aujourd'hui
14 312 membres club

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 LA FENETRE EST TOUJOURS ACTIVE


Information sur la source

Catégorie :Formulaire Classé sous : fenêtre, active, getactivewindow Niveau : Débutant Date de création : 15/05/1999 Vu : 5 003

Note :
4 / 10 - par 2 personnes
4,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (1)
Ajouter un commentaire et/ou une note


Description

Comment faire pour savoir si la fenêtre est toujours active ?

Créez un formulaire avec une Horloge (Timer1)
Mettez ce code dans un Module :

Source

  • Private Declare Function GetActiveWindow Lib "user32" () As Long
  • Public lgnWin As Long
  • ' Puis dans le Code de votre Formulaire, mettez ce code :
  • Private Sub Form_Load()
  • MaFenetre = Me.hWnd
  • End Sub
  • Private Sub Timer1_Timer()
  • If MaFenetre <> GetActiveWindow Then Me.WindowState = vbMinimized
  • End Sub
Private Declare Function GetActiveWindow Lib "user32" () As Long
Public lgnWin As Long

' Puis dans le Code de votre Formulaire, mettez ce code :

Private Sub Form_Load()
    MaFenetre = Me.hWnd
End Sub

Private Sub Timer1_Timer()
    If MaFenetre <> GetActiveWindow Then Me.WindowState = vbMinimized
End Sub
  • signaler à un administrateur
    Commentaire de GrosLolo le 14/04/2006 09:39:18

    C'est vrai que tel quel le code n'est pas super génial mais il fonctionne !

    Private Declare Function GetActiveWindow Lib "user32" () As Long
    ...
    ...
    if (MyForm.hWnd = GetActiveWindow) then
       ' Ma fenêtre est active
    else
       ' ou elle ne l'est pas
    end if

    GrosLolo.

Ajouter un commentaire

Pub



Appels d'offres

Recherche developpeur ...
Budget : 700€
SITE MARCHAND LOCATION...
Budget : 3 000€
SITE MARCHAND POUR HOTEL
Budget : 4 000€

CalendriCode

Septembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
2930     

Téléchargements

Logiciels à télécharger sur le même thème :

Boutique

Boutique de goodies CodeS-SourceS