Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2004.11.28;
Скачать: [xml.tar.bz2];

Вниз

Управление потоками   Найти похожие ветки 

 
Alibaba ©   (2004-10-15 04:53) [0]

Господа, такая ситуация:

Есть главный поток
TThMaster = class(TThread)
...
end;
thMaster: TThMaster;

Есть N дополнительных потоков
TThDepend = class(TThread)
...
end;
thDepend: array[0..N] of TThDepend;

Есть список задач
TTask = class
...
end;
ListTask: TList

Список задач время от времени пополняется
ListTask.Add(TTask.Create(...))
и запускается главный поток
thMaster.Resume

Главный поток проверяет если есть нерешенные задачи в очереди и свободный дополнительный поток (СДП), то передаем СДП задачу, и запускаем СДП (thDepend.Resume).
И так до тех пор пока не останется нерешенных задач или все потоки заняты.
После этого главный поток засыпает (Suspend)

Если СДП завершил работу, то он должен разбудить главный поток (thMaster.Resume). Главный поток раздает задачи (см. предыдущий абзац)

Главный поток могут будить два события:
- появилась новая задача
- какой-либо из дополнительных потоков завершил работу

В чем проблема?
Бывает такая ситуация, что главный поток занимается раздачей заданий и в это время один из дополнительных потоков сообщает ему что он все посчитал (thMaster.Resume) - происходит ошибка.

Как сделать, что-бы если главный поток работает, а дополнительный хочет ему что-то сказать, то что-бы дополнительный подождал?


 
Ozone ©   (2004-10-15 07:35) [1]

WaitForSingleObject?



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

Форум: "WinAPI";
Текущий архив: 2004.11.28;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.052 c
14-1100248404
Ega23
2004-11-12 11:33
2004.11.28
Посоветуйте Linux


3-1099041383
art
2004-10-29 13:16
2004.11.28
Программная конфигурация BDE


3-1099128141
Hmm
2004-10-30 13:22
2004.11.28
Excel таблица в Delphi. Редактирование, удаление, поиск ???


1-1100242872
Alex P
2004-11-12 10:01
2004.11.28
Создание программы в виде процессса windows


14-1100094473
}|{yk
2004-11-10 16:47
2004.11.28
Ааааааааааааааааа! Наконец-то стали известны результаты выборов!





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский