Einzelnen Beitrag anzeigen

r29d43

Registriert seit: 18. Jan 2007
289 Beiträge
 
Delphi 10.4 Sydney
 
#17

Re: PID eines prozesses merken, Anwendung ähnlich Taskleiste

  Alt 6. Aug 2009, 13:21
ungefähr so insgesamt?

Delphi-Quellcode:
function getTWHandle(twH1,twH2,twH3 : THandle) : THandle;
function checkHandle(hToCheck : THandle) : boolean;
begin // muss true sein wenn hToCheck nicht schon in Handle123 registriert ist
  result := (twH1 <> hToCheck) and (twH2 <> hToCheck) and (twH3 <> hToCheck);
end;
begin
  result := 0;
  repeat
    result := FindWindowEx(0,result,'Notepad','Unbenannt - Editor');
  until (result = 0) or checkHandle(result);
end;
(Ich checkte das mal schnell für drei gleiche NotePad-Aufrufe).
  Mit Zitat antworten Zitat