Показать сообщение отдельно
Старый 29.01.2005, 10:01     # 4
Ghost
::VIP::
Звезда первого сезона
Молчун-2004
 
Аватар для Ghost
 
Регистрация: 24.08.2002
Сообщения: 1 575

Ghost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех Гуру
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.
Вроде усе пашет...
__________________
Действовать надо тупо и это лучшее доказательство нашей чистоты и силы!

Последний раз редактировалось Ghost; 29.01.2005 в 10:53. Причина: склероZzz...
Ghost вне форума