Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.11.01;
Скачать: CL | DM;

Вниз

Установка приоритета процесса   Найти похожие ветки 

 
Vitaliy_____   (2008-09-23 06:39) [0]

Добрый день.
Что-то не смог разобраться с темой.
У нас есть 2 ф-и: установки приоритета процессу и текущему потоку.

SetPriorityClass;
SetThreadPriority;

Мне нужно чтобы приоритет менялся аналогично тому, как если бы мы его выставили в диспетчере задач (желательно, чтобы и там это отобразилось). Какую из этих ф-й (их сочетание) использовать?
Судя, скажем по http://www.cyberguru.ru/programming/win32/windows-processes-page3.html
не все так просто как кажется...


 
Юрий Зотов ©   (2008-09-23 11:10) [1]

Скачайте книгу Джеффри Рихтера "Windows для профессионалов", там все это подробно описано. Здесь рассказывать слишком долго, в книге этому целый раздел посвящен.


 
Vitaliy_____   (2008-09-23 12:14) [2]

Книгу скачал, с удовольствием углублю знания. Там еще и про реестр много интересного - спасибо за совет.
Правда я решил выставить приоритеты уже таким образом (по возрастанию) - в диспетчере отображается почти так как хотел, меня уже устраивает.

case Process_Priority_Selection.ItemIndex of
0:begin
   SetThreadPriority(T,THREAD_PRIORITY_NORMAL);
   SetPriorityClass(H,IDLE_PRIORITY_CLASS);
  end;
1:begin
   SetThreadPriority(T,THREAD_PRIORITY_LOWEST);
   SetPriorityClass(H,NORMAL_PRIORITY_CLASS);
  end;
2:begin
   SetThreadPriority(T,THREAD_PRIORITY_NORMAL);
   SetPriorityClass(H,NORMAL_PRIORITY_CLASS);
  end;
3:begin
   SetThreadPriority(T,THREAD_PRIORITY_ABOVE_NORMAL);
   SetPriorityClass(H,NORMAL_PRIORITY_CLASS);
  end;
4:begin
   SetThreadPriority(T,THREAD_PRIORITY_NORMAL);
   SetPriorityClass(H,HIGH_PRIORITY_CLASS);
  end;
end;// case


 
Vitaliy_____   (2008-09-23 12:16) [3]

Забыл, T-поток, H-процесс.

var H : THandle;
   T: Cardinal;
begin
H := GetCurrentProcess();
T :=  GetCurrentThread();
...



Страницы: 1 вся ветка

Текущий архив: 2009.11.01;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.02 c
4-1221118011
dmitry_12_08_73
2008-09-11 11:26
2009.11.01
Функция GetNextWindow ищет не все окна


2-1252269484
indiegod
2009-09-07 00:38
2009.11.01
Уничтожение динамического TImage


1-1222172199
zorik
2008-09-23 16:16
2009.11.01
Алгоритм наложения


15-1251750605
Юрий
2009-09-01 00:30
2009.11.01
С днем рождения ! 1 сентября 2009 вторник


2-1252429844
wah
2009-09-08 21:10
2009.11.01
Oптимизировать загр. txt-файла в StringList и дальше в RichEdit