CONNAITRE LA FENTRE ACTIVE WINDOWS QUI A LE FOCUS [Résolu]

Messages postés
16
Date d'inscription
jeudi 18 mars 2010
Statut
Membre
Dernière intervention
10 janvier 2011
- - Dernière réponse : cs_Exploreur
Messages postés
4824
Date d'inscription
lundi 11 novembre 2002
Statut
Membre
Dernière intervention
15 novembre 2016
- 7 janv. 2011 à 14:56
Salut,
je veux écrire un programme vb6 pour afficher le nom de fenêtre qui à la focus le code qui j'utilise est la suivant :

Public Declare Function GetWindowTextLength Lib "user32" Alias "GetWindowTextLengthA" (ByVal hwnd As Long) As Long
Private Declare Function GetWindowText Lib "user32" Alias GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long

Private Declare Function GetForegroundWindow Lib "user32" () As Long

Public Function GetActiveWindowApp() As String
Dim hWndlength As Long, hWndTitle As String, returnvalue As Long
Dim hwnd As Long
hwnd = GetForegroundWindow
hWndlength = GetWindowTextLength(hwnd)
hWndTitle = String$(hWndlength, 0)
returnvalue = GetWindowText(hwnd, hWndTitle, (hWndlength + 1))
GetActiveWindowApp = hWndTitle
End Function

Private Sub Form_Load()
MsgBox GetActiveWindowApp()
End Sub
Mais lorsqu'on le focus sur un page web n'affiche aucun resultat.
Merci de m'aider.
Afficher la suite 

2 réponses

Meilleure réponse
Messages postés
16
Date d'inscription
jeudi 18 mars 2010
Statut
Membre
Dernière intervention
10 janvier 2011
3
Merci
Salut,
Finalement j'utilise le timer pour afficher le nom de fenetre qui à la focus .Ce programme ça marche

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 140 internautes nous ont dit merci ce mois-ci

Commenter la réponse de noussaDardouri
Messages postés
4824
Date d'inscription
lundi 11 novembre 2002
Statut
Membre
Dernière intervention
15 novembre 2016
11
0
Merci
Un timer ? Je me demande s'il n'y a pas une API qui pourrais faire cela....?

++ Exploreur Linux a un noyau, Windows un pépin     ** http://www.The-West.fr Alias : Exploreur **
Commenter la réponse de cs_Exploreur