Du mußt doch nur hier
Delphi-Quellcode:
procedure GetProcs(sl: TStringlist);
var
hProcSnap: THandle;
pe32: TProcessEntry32;
begin
{ Snapshot machen *PENG* }
hProcSnap := CreateToolHelp32SnapShot(TH32CS_SNAPPROCESS, 0);
if hProcSnap = INVALID_HANDLE_VALUE then exit;
pe32.dwSize := SizeOf(ProcessEntry32);
{ wenn es geklappt hat }
if Process32First(hProcSnap, pe32) = true then
{ und los geht's }
while Process32Next(hProcSnap, pe32) = true do
begin
sl.Add(pe32.szExeFile);
end;
CloseHandle(hProcSnap);
end;
in der while Schleife kucken, ob der gefundene Prozess (die Exe davon) die ist, die du suchst. Wo ist das Problem? Und anstatt der StringList übergibst du den Namen der Exe und machst daraus eine Funktion, die dir True zurückgibt, wenn die Exe gefunden wurde. Und dir den Code so in zu biegen, dass er deinen Erfordernissen entspricht, dürfte ja nicht so sschwer sein oder?