Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

убить TThread 


neo_   (2001-12-18 12:33) [0]

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



Digitman   (2001-12-18 13:10) [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; // "убийство" потока





Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.021 c
3-21902           Andrey Pogorelov      2001-12-02 10:49  2002.01.08  
Проблема с составлением запроса и выводом его в QReport


14-22385          модератор             2001-11-03 11:57  2002.01.08  
>To Merlin - (SYSTRAY)


3-21911           Jaya!                 2001-11-11 12:58  2002.01.08  
Глюки в ВДЕ


6-22278           garage                2001-10-02 12:27  2002.01.08  
Подскажите алгоритм замены больших букв на маленькие


3-21897           МаксБ                 2001-11-27 14:33  2002.01.08  
СУБД Cache