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

Вниз

Как изменить приоритет основного потока   Найти похожие ветки 

 
Kost ©   (2004-09-30 06:41) [0]

Здравствуйте.
Основной поток приложения осуществляет некоторый цикл работы с файлами.
Необходимо создать паралельный поток для выполнения других действий. Однако даже при установке самого высокого приоритета для создаваемого потока, основной поток все равно преобладает и
создаваемый поток вообще не выполняется. Можно ли уменьшить приоритет основного потока или как-либо по-другому решить этот вопрос?
Спасибо.


 
Fedia   (2004-09-30 07:08) [1]

>или как-либо по-другому решить этот вопрос?
Можно выполнять этот "цикл работы с файлами" не в основном, а также в дополнительном потоке.


 
Kost ©   (2004-09-30 07:11) [2]

Спасибо, но по объективным причинам этот вариант не возможен.


 
Fedia   (2004-09-30 08:48) [3]

Попробуй следующее:

var
  MainThread: THandle;
begin
  MainThread := GetCurrentThread;
  SetThreadPriority(MainThread, THREAD_PRIORITY_IDLE);
end;

Или же прерывай работу основного потока на время работы дополнительного.


 
Digitman ©   (2004-09-30 11:29) [4]


> Kost ©   (30.09.04 07:11) [2]
> по объективным причинам этот вариант не возможен.


можно полюбопытствовать, что это за причины ?


 
KSergey ©   (2004-09-30 12:00) [5]

> [2] Kost ©   (30.09.04 07:11)
> Спасибо, но по объективным причинам этот вариант не возможен.

Вот тут как раз и ошибка


 
KSergey ©   (2004-09-30 12:00) [6]

> [2] Kost ©   (30.09.04 07:11)
> Спасибо, но по объективным причинам этот вариант не возможен.

Вот тут как раз и ошибка


 
Erik1 ©   (2004-09-30 12:28) [7]

PHandle := GetCurrentProcess;
SetPriorityClass(PHandle, REALTIME_PRIORITY_CLASS);
SetThreadPriority(handle to the thread, THREAD_PRIORITY_TIME_CRITICAL)
После это получиш от системы все, что можно. Просто офигееш! :)



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

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

Наверх




Память: 0.48 MB
Время: 0.024 c
14-1096279713
Mar_gel
2004-09-27 14:08
2004.10.17
Помогите! Delphi перестала компилить свои библиотеки в проект


3-1095352280
3APA3A
2004-09-16 20:31
2004.10.17
select distinct ...


14-1096277367
gn
2004-09-27 13:29
2004.10.17
Я просто тащусь с некрасота чесное слово ;-)


14-1096012323
clickmaker
2004-09-24 11:52
2004.10.17
Глюки DNS на 2000 advanced сервере


1-1096787566
Roobee
2004-10-03 11:12
2004.10.17
Снова Excel и Delphi - plugin для Excel