Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

убить TThread


neo_ ©   (2001-12-18 12:33:00) 

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


Digitman   (2001-12-18 13:10:00) [1]

пример, ставший классикой :


type

TMyThread = class(TThread)
protected
procedure Execute; override;
end;

var
MyThread; TMyThread;

implementation

procedure TMyThread.Execute;
begin
while not Terminated do begin
.......
end;
end;

...
MyThread:= TMyThread.Create(..); создание и старт потока
...
MyThread.Free; // "убийство" потока



Наверх

Титульная страница Поиск, карта сайта Написать письмо