| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Приоритеты в КОЛ [Delphi, Windows]

RA ©   (2004-03-18 19:31:00) 

Как ба поменять приоритет приложения в КОЛ. Долго искал и ничего не нашел.

---

SPeller   (2004-03-21 16:48:00) [1]

LMD :-))

---

miek   (2004-03-21 16:38:00) [2]

Ну и зачем такие сложности?

---

Dimaxx   (2004-03-20 23:49:00) [3]

Правильнее так:

procedure TForm1.KOLForm1FormCreate(Sender: PObj);
var ProcessID: cardinal;
   ProcessHandle: THandle;
   ThreadHandle: THandle;
begin
 ProcessID:=GetCurrentProcessID;
 ProcessHandle:=OpenProcess(PROCESS_SET_INFORMATION,False,ProcessID);
 SetPriorityClass(ProcessHandle,IDLE_PRIORITY_CLASS);
 ThreadHandle:=GetCurrentThread;
 SetThreadPriority(ThreadHandle,THREAD_PRIORITY_IDLE);
end;

---

RA   (2004-03-19 19:33:00) [4]

Спасибо

---

miek   (2004-03-18 22:04:00) [5]

Так же, как и везде.

setpriorityclass( getcurrentprocess, high_priority_class);

---

Наверх