Moin DRPEnc,
woher hast Du denn RunProcess, wenn Du es nicht selber geschrieben hast?
Schau Dich hier doch mal nach
CreateProcess oder
ShellExecuteEx um.
Eines von beiden wird mit Sicherheit in der Funktion benutzt.
[EDIT]
Ach so, die Funktion ist das.
Dann könnte es so gehen:
(Ausschnitt)
Code:
function RunProcess(FileName: string; ShowCmd: DWORD; wait: Boolean; ProcID: PDWORD;[color=red]const AdwProcessPriority : DWORD[/color]): Longword;
//...
[color=red]SetPriorityClass(ProcessInfo.hProcess,AdwProcessPriority);[/color]
if wait = FALSE then
begin
if ProcID <> nil then ProcID^ := ProcessInfo.dwProcessId;
exit;
end;
WaitForSingleObject(ProcessInfo.hProcess, INFINITE);
GetExitCodeProcess(ProcessInfo.hProcess, Result);
end;
[EDIT2: Korrektur]
Natürlich vor die Abfrage ob gewartet werden soll oder nicht
[/EDIT]
[/EDIT]