Priorität eines anderen Programmes ändern

[renekr]

Hi,
ich stehe vor dem selben Thema und hab ein Problem das ich ein Invalid Handle als Last Error bekomme.

Kann mir ev. jemand auf die Sprünge helfen?

Code: der zum invalid Handle führt.

Delphi-Quellcode:

if SetPriorityClass(GetProcID(LMDFileOpenEdit1.Filename), Cardinal(ComboBox1.Items.Objects[ComboBox1.ItemIndex])) then
edit1.text:='OK'
else
edit1.text:=SysErrorMessage(GetLastError);

damit gehts für das eigene Programm.
SetPriorityClass(GetCurrentProcess(), HIGH_PRIORITY_CLASS); damit gehts für das andere Programm.

Delphi-Quellcode:

if SetProcessPriorty (GetProcID(LMDFileOpenEdit1.Filename),256)then
edit1.text:='OK'
else
edit1.text:=SysErrorMessage(GetLastError);

Die PID ist korrekt welche ich auslese!

Danke.