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

Вниз

Совместный доступ двух потоков к объекту TQueue   Найти похожие ветки 

 
Balkon   (2004-11-17 14:01) [0]

Добрый день, Уважаемые! Подскажите пожалуйста, корректно ли использовать объект TQueue, при совместном доступе к нему из двух потоков(основного и вторичного), помещая обращения к очереди Push, Pop, Peek в критические секции? Заранее спасибо.

Код вроде следующего:

var P: PSomeData;
...
EnterCriticalSection(MainCS);
Queue.Push(P);//В основном потоке
LeaveCriticalSection(MainCS);
...
EnterCriticalSection(SecondaryCS);
SomeData := PSomeData(Queue.Peek)^;//Во вторичном потоке
LeaveCriticalSection(SecondaryCS);
...


 
Digitman ©   (2004-11-17 14:04) [1]

не знаю, что из себя представляет этот класс-очередь, но в первом приближении - достаточно корректно.

а в связи с чем возник вопрос ?


 
Balkon   (2004-11-17 14:12) [2]

Спасибо.
[а в связи с чем возник вопрос ?]
Пишу оболочку для некой железяки, подключенной через com-порт. В очередь помещаю команды, которые затем пишутся в порт вторичным потоком. Имеются определенные баги... Ищу причину. Попытаюсь конкретнее описать проблему позже, если не найду причин, а сейчас покопаю в другом месте.



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

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

Наверх




Память: 0.47 MB
Время: 0.049 c
10-1068820738
Юрий
2003-11-14 17:38
2004.12.05
CORBA (VisiBroker 4.0) в Delphi6


14-1100766738
Dmitriy O.
2004-11-18 11:32
2004.12.05
Удаленное администрирование своих программ.


1-1101001566
Bobby Digital
2004-11-21 04:46
2004.12.05
Listbox & Edit


1-1100693931
Шурик Ш
2004-11-17 15:18
2004.12.05
Какой командой можно принудительно завершить работу приложения?


1-1100685907
Mishenka
2004-11-17 13:05
2004.12.05
NameValueSeparator в TStringList