Уважаемый ALL, Если кто из вас имеет опыт работы с TThread подскажите, please, способ, чтобы быстро тушить триаду. Ситуация такая - есть поток данных в реальном времени, их надо обрабатывать. Чтобы не прерывался прием новых данных, обработка происходит в новой триаде. Обработка довольно длительная. Логика принята такая - если предыдущая триада завершилась,то создаем новую и все нормально. Если предудущая не завершена, то делаем Thread.Terminate, после чего создаем новую Thread.Create. Так вот иногда предыдущая не исчезает быстро и даже некотрое время они работают вместе и программа дохнет. Так вот вопрос существует ли способ быстрого тушения, только очищая стек, т.е. не применяя форсированную winAPI функцию, котороая не освобождает стек.
Применение методла .waifor не очень желательно, так как это замедляет, к тому же я не понял куда его надо вставлять.
Либо может создавать пару триад для поочередной работы.
Вот если есть у кого какие соображения - поделитесь пожалуйста.
Спасибо.

Метод Terminate — это указание потоку завершиться, с возможностью корректно освободить ресурсы!
Путей здесь много, к примеру:
1)Добавляй глобальный флаг и при выходе из Execute меняй его, а в новом потока проверяй.
2)Прежде чем создать новый поток проверяй:

Код

Try Твой_Поток.WaitFor except end;

Для немедленного завершения потока, можеш использовать TerminateThread - но енто опасная штука

Это сообщение отредактировал(а) Girder - 1.9.2004, 15:49

Цитата(Girder @ 1.9.2004, 15:48)

1)Добавляй глобальный флаг и при выходе из Execute меняй его, а в новом потока проверяй.

Это я делаю.

Цитата(Girder @ 1.9.2004, 15:48)

2)Прежде чем создать новый поток проверяй: Код Try Твой_Поток.WaitFor except end;

не понял я как работает .WaitFor чего он ждет.
такой код
.Terminate;
.waiFor;
.Create();
почему то не работет у меня.

Цитата(Girder @ 1.9.2004, 15:48)

Try Твой_Поток.WaitFor except end;

Т.е. логика такая если триада выполнена то будет выполняться Except, если же продолжается то будеt try стоять. А он что сам будет стоять , там тормоза никакого не надо?
Спасибо.

Это сообщение отредактировал(а) mikleN - 1.9.2004, 16:22

для "быстрого тшения" имеет смысл использовать самописный "мэнэджер потоков" который выделяет память под все переменные, используемые в потоках. Соответственно при вызове TerminateThread() память потеряна не будет

P.S.
Terminate() просто устанвливает флаг Terminated а ответственность за остановку берет на себя поток ( поэтом если ты редко проверяеш этот флаг возможно большое время выхода )

_hunter согласен.

Цитата

Т.е. логика такая если триада выполнена то будет выполняться Except, если же продолжается то будеt try стоять. А он что сам будет стоять , там тормоза никакого не надо?

Да нет. Просто WaitFor может закончится ошибкой, по этому я его и заключил в Try except end;

Пример использования:
Т1:TMyThread - некий твой переопределенный класс

Код

type //Класс - который будет сообщать потоку что он должен завершится и ждать окончания завершения потока TKillThread = class(TThread) private  { Private declarations } protected  Kill:TThread;  procedure Execute; override; end; ... procedure TKillThread.Execute; begin Kill.Terminate; try  Kill.WaitFor; except end; T1 := TMyThread.Create(False); end; .... procedure TForm1.Button1Click(Sender: TObject); //Вот так можно удалять var x:TKillThread; begin T1:=TMyThread.Create(False); //Данная строчка - для примера x:=TKillThread.Create(true); x.FreeOnTerminate:=true; x.Kill:=t1; x.Resume; end;

Удачи.

Это сообщение отредактировал(а) Girder - 1.9.2004, 17:52