Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > TJvThread

Автор: SoWa 1.2.2005, 14:59

Как можно остановить работу этого компонента?
Пример

Код


JvThread1.Execute...
begin
 while not eof(f) do
  begin
   .........
  end;
end;

и конца этому потоку пока не предвидится.
Пробовал
JvThread1.Destroy;
JvThread1.Free;
JvThread1.S... (что-то на S)
И ничего не помогло!
Помогите пожалуйста! smile

Автор: RA 1.2.2005, 16:04

Может JvThread1.Terminate;

Автор: RA 1.2.2005, 16:14

Цитата(SoWa @ 1.2.2005, 14:59)

(что-то на S)

А на S это Suspend

Автор: Illusion Dolphin 1.2.2005, 18:32

Цитата

JvThread1.Destroy;
JvThread1.Free;
JvThread1.S... (что-то на S)

Ничего подобного выйдет.... Если нить одна, то проще всего сделать глобальную переменную, в которую по умолчанию поставить false, а когда нужно убить нить - поставить true, а в самом коде нити

Код


JvThread1.Execute...
begin
while not eof(f) do
 begin
  if My_global_var then break; (хотя по большому счёту и проверку лучше выполнять синхронно)
  .........
 end;
end;

Автор: Петрович 1.2.2005, 23:09

Illusion Dolphin в принципе прав.
Только для этого не нужен глобал. Для этого имеются свойство Terminated и метод Terminate.

Код


JvThread1.Execute...
begin
  while not eof(f) and not Terminated  do begin
     ......... // тяжелый труд по обработке очередной порции файла
  end;
end;
...
  JvThread1.Terminate; // требование остановить работу потока JvThread1

А вообще, посмотри пример в jvcl\examples\JvThread\ - там все просто и наглядно.

Автор: SoWa 3.2.2005, 12:12

Спасибо