begin process at 2012 02 13 23:08:48
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Formulaire

 > SAVOIR SI LA FENETRE EST TOUJOURS ACTIVE

SAVOIR SI LA FENETRE EST TOUJOURS ACTIVE


 Information sur la source

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

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

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

Auteur : Nix

Ecrire un message privé
Site perso
Ce membre participe au partage de revenus publicitaires
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



 Sources du même auteur

Source avec Zip Source avec une capture Source .NET (Dotnet) FAIRE UN PING (ICMP) EN VB 2005 (LE PLUS SIMPLEMENT DU MONDE...
IMPRIMER LE CONTENU D'UN RICHTEXTBOX
Source avec Zip Source avec une capture TESTEUR DE REGEX (REGULAR EXPRESSIONS)
Source avec Zip Source avec une capture FORCER LE REBOOT SOUS WINDOWS NT OU WINDOWS 2000 (REDÉMARRAG...
COMPTER LES MOTS DANS UNE CHAINE DE CARACTÈRE

 Sources de la même categorie

Source avec Zip GEST COTISATION - ASSOCIATION par MOHA555
Source avec Zip HSCROLLBAR POUR L'ARRIÈRE PLAN par 320C
Source avec Zip Source avec une capture Source .NET (Dotnet) METTRE VOTRE FORM VB.NET EN PLEINE ÉCRAN par Gabilach
RECHERCHE DANS UNE LISTE À PARTIR D'UN CHAMP TEXTE par jmeunier
Source avec Zip GESTION DES COMSOMMABLE par gboraud

 Sources en rapport avec celle ci

Source avec Zip FERMER UN PROGRAMME, UNE APPLICATION, UNE FENÊTRE... D'APRÈS... par RENAUD34
Source avec Zip Source avec une capture CAPTEUR DE HANDLE, DE TITRE, DE CLASS, DE POSITION DE TAILLE... par Sechaud
Source avec Zip GÉRER MODIFICATION DE DONNÉE DANS CELLULE EXCEL (CODE VBA) par JM247L
Source avec Zip SIGNATURE STANDARDISÉE DANS OUTLOOK VIA PARAMÈTRES ACTIVE DI... par drassef14
Source avec Zip LISTER LES FENÊTRES ACTIVES *** par thebigbang

Commentaires et avis

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


Discussions en rapport avec ce code source dans le forum

hwnd d'une fenêtre [ par psychodingue ] Comment je peux faire pour trouver le hwnd de la fenêtre active svp? En fait, je voudrai pouvoir détecter si la fenêtre de mon prog est celle active o Fermer une fenêtre DOS active [ par Lolo ] Comment fermer une fenêtre DOS qui est active.shell( "command.com") Comment connaître le nom de la fenêtre MDI active ? [ par FalcoN ] Comment connaître le nom de la fenêtre MDI active ?(Pour ensuite récupérer grâce à ce nom le fichier qui est ouvert... pour pouvoir l'éxécuter...) URGENT : Nom ou handle de l'application (fenêtre) active du bureau. [ par Philippe ] Bonjour,Je souhaiterais savoir s'il est possible de récupérer le nom (ou le handle) de la fenêtre actuellement active du bureau.Merci de votre aide. FENETRE ACTIVE [ par yoarf ] Bonjour,Je développe en vb Access. Je fais appel et j'ouvre un document Excel. Celui-ci donc s'affiche. Ainsi le fichier Excel devient la fenêtre acti Mettre une fenêtre active au 1er plan [ par JMO ] &nbsp;Bonjour &#224; tous....En VBS, j'arrive &#224; &#233;num&#233;rer les fen&#234;tres et les ID associ&#233;es.Mais comment mettre une application Quelle fenêtre active ? [ par elyote666 ] Salut &#224; tous !Comment faire pour que mon programme d&#233;tecte quelle fen&#234;tre&nbsp;&#224; le focus&nbsp;dans Windows.&nbsp;Merci de vos r&# Sendkeys autre que dans fenêtre active [ par Lolobibop ] Bonjour,J'ai essayé d'automatiser des tâches quotidienne avec un logiciel Clavier+Une combinaison de frappe de touches permet de faire des actions.Il Rendre une fenêtre active [ par manud31 ] Bonsoir &#224; tous, Comment rendre une fen&#234;tre VB active quand c'est la f&#234;n&#234;tre d'un autre logiciel qui l'est? Par exemple si userform


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 5,522 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales