Handle de fenêtre et process ID...Résolu

Question

Salut tout le monde ! Via la fonction Shell, je lance une application (la fonction Shell me retourne le process Id de l'appli lancée mais pas le handle) Avant, je m'appuyais sur la classe de fenêtre pour la retrouver : 'on lance l'appli hApp = Shell( + " " + , ) hFen = 0 'Recherche du handle de la fenêtre (hFen) selon sa classe (zClassFen) jusqu'à la fin du timer ou jusqu'à ce qu'on trouve Do While hFen = 0 And (Timer < lTimer) DoEvents hFen = GetWinHandle(zClassFen) Loop PS : Je ne détaille pas la fonction GetWinHandle mais j'utilisais les API GetWindow et GetClasseName Cela fonctionnait très bien à partir du moment où on connaissait la classe de fenêtre. Aujourd'hui, je cherche à récupérer le handle d'une appli selon son process Id. On aurait donc : 'on lance l'appli hApp = Shell( + " " + , ) hFen = 0 'Recherche du handle de la fenêtre (hFen) selon sa classe (zClassFen) jusqu'à la fin du timer ou jusqu'à ce qu'on trouve Do While hFen = 0 And (Timer < lTimer) DoEvents hFen = GetWinHandlePid(hApp) Loop Et c'est là que je sèche ! Si vous avez des idées, n'hésitez pas à me contacter. Merci d'avance ! Cyril

BruNews · Accepted Answer

EnumWindows
et regarde pendant &#233;num&#233;ration (dans l'enumProc) la 1ere qui correspond au processId.

ciao...
http://dev.winsysdev.com
BruNews, MVP VC++

BruNews · Answer

OpenProcess()

ciao...
http://dev.winsysdev.com
BruNews, MVP VC++

cyrilpradel · Answer

Merci ! Après avoir déclaré l'API OpenProcess, voilà donc ce que j'ai fais : 'on lance l'appli hApp = Shell( + " " + , ) hFen = 0 'Recherche du handle de la fenêtre (hFen) selon le pID hFen = OpenProcess(1, False, hApp) Hélàs, le retour dans hFen ne correspond pas du tout au handle de la fenêtre à rechercher... Si vous avez d'autres idées... Cyril

cyrilpradel · Answer

Je tiens &#224; pr&#233;ciser que ce n'est pas le handle du processus que je cherche &#224; r&#233;cup&#233;rer en fonction du process ID mais le handle de la fen&#234;tre lanc&#233;e.

Cyril

BruNews · Answer

Tu demandes handle d'une appli (donc le prog) et ensuite tu dis que le handle ne correspond pas &#224; une fen&#234;tre, bien pour la coh&#233;rence.

ciao...
http://dev.winsysdev.com
BruNews, MVP VC++

cyrilpradel · Answer

Voici donc le code exact : 

Private Declare Function GetWindowThreadProcessId Lib "USER32" (ByVal hwnd As Long, lpdwprocessid As Long) As Long


Private Declare Function GetParent Lib "USER32" (ByVal hwnd As Long) As Long


Private Declare Function GetWindow Lib "USER32" (ByVal hwnd As Long, ByVal wCmd As Long) As Long


Private Declare Function FindWindow Lib "USER32" Alias "FindWindowA"
(ByVal lpClassName As Any, ByVal lpWindowName As Any) As Long


Private Const GW_HWNDNEXT =  2

-------------------------------------------------------------------

Public Function ProcIDFromWnd(ByVal hwnd As Long) As Long


'Renvoie l'id d'un processus &#224; partir d'un handle de fen&#234;tre


Dim idproc As Long


GetWindowThreadProcessId hwnd, idproc


ProcIDFromWnd = idproc


End Function

--------------------------------------------------------------------
      


Public Function  GetWindowHandle (hInstance As Long) As Long


 


'Renvoie un handle de fen&#234;tre &#224; partir d'un id de processus


Dim tempHwnd As Long


tempHwnd  = FindWindow(vbEmpty, vbEmpty)


Do Until tempHwnd = 0


    If GetParent(tempHwnd) = 0 Then


         If hInstance = ProcIDFromWnd(tempHwnd) Then


            GetWindowHandle = tempHwnd


            Exit Do


         End If


      End If


    tempHwnd = GetWindow(tempHwnd, GW_HWNDNEXT)


Loop


End Function




Et pour l'appeler :

Dim id As Long


id = Shell("notepad.exe")


MsgBox GetWindowHandle(id)

En esp&#233;rant que &#231;a pourra aider d'autres personnes,

A+

Cyril

Handle de fenêtre et process ID...

6 réponses

Discussions similaires