зависает поток

← →
Quest (2004-08-18 00:32) [0]

Здраствуйте.
У меня такая проблема - после нескольких вызовов Synchronize(change) программа зависает. Что я неправильно делаю?

type
TFileThread=class(TThread)
private
text: string;
item: TListItem;
protected
procedure change;
procedure additem;
procedure execute; override;
end;

...

procedure TFileThread.additem;
begin
item := Form1.ListView1.Items.Add;
end;

procedure TFileThread.change;
begin
item.Caption := text;
end;

procedure TFileThread.execute;
begin
...
Synchronize(AddItem);
while true do
begin
...
synchronize(change); // проблема
...
end;
...
end;

Заранее спасибо

← →
Ihor Osov'yak © (2004-08-18 03:19) [1]

код, приведенный Вами, недостаточный, чтобы понять в чем проблема. Вероятнее всего где-то возникает клинч основного и рабочего потока.
Как подсказка - для успешного срабатывания synchronize нужно, чтобы на момет вызова синхронайз цыкл выборки основного потока не был заторможен (так как передача управления подсинхроназнутой процедуре идет с использованием цыкла выборки сообщений основного потока). Если же Вы после старта рабочего потока в основном используете что то вида sleep и/или WaitForSingleObject - все может быть.. Вообще-то сделайте вывод в отладочный текстовый лог котнольных точек основного потока и рабочего (но не забудьте про критические секции, так как функция записи в лог будет вызываться и из основного потока, и из рабочего, и возможно, "в один и тот же момент времени". Трассировкой в пошаговом режиме проблему не всегда можно локализировать, так как при пошаговом выполнение временное соотношение событий основного потока и рабочего очень отличаются от соотношений нормального выполнения..

Также пожно попытаться при "зависании" сделать паузу программы и по CtrlAltC все же посмотреть, где и на чем висим, в каком состоянии находятся потоки программы.

Зы. Проще ошибок этого класса избегать, чем потом ловить. Один из вариантов этого избегания - изначально продумывать вопрос синхронизации потоков программы, и по возможности избегать использования синхронайз ввиду его недостаточной гибкости и излишней в большинстве случаев синхронизации рабочего и основного потоков - я, к примеру, синхронайз вообще никогда не использую. Мало того, я придерживаюсь мнения - что синхронайз - далеко не самое удачное решения Борланда. Ибо начинающие не совсем понимают механизма его действия и постоянно наступают на грабли с ним. А после разборки со способами синхронизации и взаимодействия потоков (в том числе и с решением "синхронайз" от Борланда) совсем исчезает необходимость использовать синхронайз. Правда, незадача - наличие борландовского синхронайз очень уж не способствует приближения момента вышеупомянутой разборки.

зависает поток Найти похожие ветки