Einzelnen Beitrag anzeigen

Benutzerbild von Amnon82
Amnon82

Registriert seit: 5. Jan 2005
186 Beiträge
 
FreePascal / Lazarus
 
#1

Hwnd find durch EXE-name, wie?

  Alt 13. Jun 2006, 17:48
Ich hab einen meiner Programmcodes zu einem kleinen Demo-Programm zusammengestellt.

Es hat ein Test-Programm und das eigentliche Programm.
Sinn dahinter ist, zwei Progressbars im eigentlichen Programm zu dublizieren, sprich
die Werte des Test-Programms zu übernehmen.

Das HWnd finde ich über FindWindowByTitle.

Nun möchte ich aber das HWnd auch per EXE-Name finden.
Nur weis ich nicht wie.

Folgenden Code hab ich so gefunden:

Delphi-Quellcode:
Uses JCLSYSINFO
...
var PID : DWORD;
begin
  //Hwnd := FindWindowbytitle('Titel_der_EXE');
  PID := GetPidFromProcessName('Name_der.exe');
  Hwnd := GetMainAppWndFromPid(PID);
  if Hwnd <> 0
  then
   //tu was
end;
Leider benötigt dann das Programm 100% CPU

Gibt es ne Lösung?
Angehängte Dateien
Dateityp: zip getprogress_v2_207.zip (875,8 KB, 18x aufgerufen)
  Mit Zitat antworten Zitat