HoverHell
Гыхм... Переименуй файл TASKMGR.EXE в, например, TASKMGR2.EXE, а на его место (с тем же именем) запиши свой exe-шник, который будет запускать старый с нужным приоритетом. Сделать такую прогу в дельфе не очень долго, запустить прогу с каким-то приоритетом, если не ошибаюсь, может функция CreateProcess:
Код:
program taskmgr;
{$APPTYPE CONSOLE}
uses
SysUtils, Windows;
var
lpPI: TPROCESSINFORMATION;
lpSI: TSTARTUPINFO;
begin
GetStartupInfo(lpSI);
if CreateProcess(nil, 'TASKMGR2.EXE',
PSecurityAttributes(0),
PSecurityAttributes(0),
True,
REALTIME_PRIORITY_CLASS,
nil, nil, lpSI, lpPI)
then
SetPriorityClass(lpPI.hProcess, REALTIME_PRIORITY_CLASS);
end.
Вроде усе пашет...