@Luckie: Ich hatte mich bissl falsch ausgedrückt. Ich meinte mehr das ich weiß wie ich an die ProcessID ran komme.
Einfacher als mit
CreateToolHelp32Snapshot und EnumProcesses
gehts
mit GetWindowThreadProcessId
hab das jetzt folgendermaßen gelöst:
Delphi-Quellcode:
procedure setnewpriority(Anwendungshandle: Cardinal);
var dwActiveProcessId:DWORD;
begin
GetWindowThreadProcessId(Anwendungshandle, @dwActiveProcessId);
SetPriorityClass(OpenProcess(PROCESS_ALL_ACCESS, False, dwActiveProcessId), HIGH_PRIORITY_CLASS);
end;