Récuperer le handle depuis le nom d'un processus

Bonjour à tous,

Je récupère la liste des processus que je met dans une ComboBox depuis cette methode:
http://www.developpez.com/delphi/faq...isterprocessus

Et j'aimerais récuperer le HWND du processus sélectionné dans la liste.
J'ai essayé ça (en choisissant le processus: notePad.exe) mais le handle est nul.

Code:

---

1 2	myHandle := FindWindow(pchar(cbMain.Items.Strings[cbMain.ItemIndex]),nil); if myHandle = 0 then mmoMain.Lines.Add('Pas de bloc notes lancé !');

---

Comment faire ?

Merci d'avance.

Citation:

---

Envoyé par dacid

Code:

---

1 2	myHandle := FindWindow(pchar(cbMain.Items.Strings[cbMain.ItemIndex]),nil); if myHandle = 0 then mmoMain.Lines.Add('Pas de bloc notes lancé !');

---

---

Avec FindWindows, tu récupère le handle d'une fenêtre (pas d'un processus).

Regarde plutôt OpenProcess :

Citation:

---

Envoyé par Aide Delphi

The OpenProcess function returns a handle of an existing process object.

---

:wink:

Bonjour Lung,

Merci mais je me suis orienté vers une autre solution:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22

tabHandles: array [0..100] of HWND; procedure TfrmMain.ListerHandles(pid: Cardinal); var handles: TList; i: Integer; findWindowsStruct: TFindWindowsStruct; begin handles:= TList.Create; Try findWindowsStruct.ProcessID:= pid; // GetCurrentProcessID findWindowsStruct.HandleList:= handles; EnumWindows(@EnumWindowsProc, Integer(@findWindowsStruct)); cbThreads.Clear; for i:= 0 to handles.Count - 1 do begin cbThreads.Items.Add(IntToStr(Integer(handles[i]))); tabHandles[i] := hwnd(handles[i]); // NE MARCHE PAS (évidement) end; cbThreads.ItemIndex := 0; Finally handles.Free; end; end;

---

En fait, c'est une procédure qui liste les handle du processus en paramètre.
C'est cool, ça marche mais il me les rends au format texte, or moi j'aimerais les mettre dans un tableau de hwnd.
Je mettrais directement cette valeur dans mon PostMessage() ensuite.

Commment transtyper du string en HWND ?
En fait, quel est le vrai format d'un HWND ?

salut,

Citation:

---

Envoyé par dacid

Commment transtyper du string en HWND ?
En fait, quel est le vrai format d'un HWND ?

---

à part erreur de ma part, le HWND n'est autre chose qu'une variable de type Cardinal, ou Integer, tout comme le THandle, le HICON et autres. en fait dans l'api windows microsoft a préféré nommer ainsi ses types de variables pour plus de clarté. :idea:
pour transtyper du string en HWND, il te suffit donc d'utiliser la fonction StrToInt :!:

Bonjour evarisnea,

En fait, il y a un truc qui m'échappe... Si je fait:
myHandle := GetTopwindow(GetforegroundWindow); // Ca marche mais que pour notePad
Et que le focus est sur le notepad par exemple, handle est égal à 263014.

Mais si j'utilise la méthode de listage des handles de la FAQ, il ne me retourne qu'un enregistrement qui est différent de celui de la première solution (459614).

De plus, j'ai essayé:
myHandle := OpenProcess(PROCESS_ALL_ACCESS,BOOL(0),tabProcessus[cbProcessus.ItemIndex]); // Ne marche pas
Mais à chaque boucle, il me renvoie un myHandle différent ??? (de surcroit qui n'a rien à voir avec les deux premières méthodes)

Soit j'ai mal assimilé le fonctionnement des processus., soit il y a une erreur...
Mon désir est simple... Je veux récupérer tous les handles d'une application.

Je vais créer un nouveau post car le sujet est vieux et le titre peu pertinent.