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

Вниз

TWebApplication & TThread   Найти похожие ветки 

 
Kibitzer ©   (2002-12-09 22:53) [0]

Во время формирования странички мне необходимо запустить несколько "ниток" (TThread), дождаться их завершения, после чего продолжить формирование странички. Собственно "дождаться" и не получается. Вопрос такой: чем заменить ProcessMessages отсутствующий у TWebApplication?


 
Polevi ©   (2002-12-10 09:31) [1]

WaitForMultipleObjects


 
han_malign ©   (2002-12-10 09:48) [2]

Win SDK Help(CreateThread): When a thread terminates, the thread object attains a signaled state, satisfying any threads that were waiting on the object.

var _ths: array[0..n-1]of THandle;
begin

............
_ths[0]:=Thread1.Handle;
............
_ths[n-1]:=ThreadN.Handle;
WaitForMultipleObjects(n,PWOHandleArray(@_ths),true,INFINITE);


 
Kibitzer ©   (2002-12-10 22:42) [3]

Честно говоря про WaitForMultipleObjects я не знал, это было познавательно - в будущем пригодится :)
Но проблема немного не в том. Дело в том, что "нитки" в процессе своей работы сбрасывают результаты в общий ресурс через Synchronize (что бы не было конфликтов). Вот на Synchronize и происходит "завис" - ожидается от главного процесса эксклюзивных прав на изменение общих ресурсов, а как это сделать? В обычных программах я просто ставил ProcessMessages и даже не задумывался об этом.


 
MBo ©   (2002-12-10 23:42) [4]

Решение может зависеть от особенностей задачи. Вероятно, Synchronize здесь не лучший выход. Возможности синхронизации доступа можно обеспечить с помощью TThreadList, TMuktiReadExclusiveWriteSynchronizer, критических секций (для потоков одного процесса), мьютексов (для межпроцессной синхр.) и т.д.
Ценный источник информации - книга Рихтера.
Посмотри еще, если интересно, http://mbo88.narod.ru/ - черновой перевод Multithreading - The Delphi Way


 
Юрий Зотов ©   (2002-12-10 23:49) [5]

Synchronize в сочетании WaitForXXX в главном потоке - это, как Вы сами сказали, 100%-ное зависание. Используйте, например, TCriticalSection (одну на всех).


 
Kibitzer ©   (2002-12-11 00:08) [6]

Так и знал, что не всё так просто :-/
Спасибо всем. Буду разбираться :)



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
1-74819
Wolverin
2002-12-11 16:46
2002.12.23
Печать


1-74635
bambina
2002-12-12 13:12
2002.12.23
TTreeview


6-74877
Romych
2002-10-24 12:26
2002.12.23
Извините что вопрос немного не в тему UDP


6-74882
Rob
2002-10-28 10:23
2002.12.23
D7 и TClient&Server Socket


4-75047
Danger
2002-11-10 23:00
2002.12.23
Не могу поставить компоненту