Dateiname einer Anwendung wenn sie aktiviert wird....

[peanut]

Hallo,

wieso lässt Du Dir nicht die PIDs auflisten und verwendest dann die folgende Funktion?

Delphi-Quellcode:

function GetExeNameByPID(pid: DWord): String;
var
  h: THandle;
begin
  Result := '';
  h := OpenProcess(PROCESS_QUERY_INFORMATION or PROCESS_VM_READ, False, pid);
  if (h <> 0) then
  try
    SetLength(Result, MAX_PATH);
    ZeroMemory(@Result[1], MAX_PATH);
    SetLength(Result, GetModuleFileNameEx(h, 0, @Result[1], MAX_PATH));
  finally
    CloseHandle(h);
  end;
  Result := LowerCase(Result);
end;

Viele Grüße

peanut.