GetPriority возвращает приоритет процесса, определяемых
uses linux;
Function GetPriority(Which,Who:Integer):Integer;
Function SetPriority(Which,Who,Prio:Integer):Integer;
GetPriority возвращает приоритет процесса, определяемых переменными Which и Who. Which может принимать значения Prio_Process, Prio_PGrp и Prio_User для идентификаторов процесса, его группы и владельца соответственно.
SetPriority устанавливает приоритет процесса. Значение Prio может быть в диапазоне от -20 до 20.
Программа, демонстрирующая функции Nice и Get/SetPriority:
Uses linux;
begin
writeln ('Setting priority to 5');
setpriority (prio_process,getpid,5);
writeln ('New priority = ',getpriority (prio_process,getpid));
writeln ('Doing nice 10');
nice (10);
writeln ('New Priority = ',getpriority (prio_process,getpid));
end.
