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.