![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Thread? [Delphi, Windows]
Юрий Ж. © (2003-12-27 23:07:00)Как прервать выполнение Thread а потом снова начаь выполнение с другими параметрами. Пример я смотрел.
Объясняю:
после вызова thread.Terminate уже нельзя ничего с ней сделать, как этого избежать.
Я понимаю, что данный вопрос скорее в WinAPI, посто прогу пишу на KOL...
Заранее благодарен!
panov (2003-12-29 21:47:00) [1]В процедуре потока должен быть опрос некоей переменной(естественно с написанием потокобезопасного кода)
Примерная процедура такая:
MyVar := 1;
CreateThread(nil,0,MyThread,0,HandleThread);
...
SuspendThread(HandleThread);
MyVar := 0;
...
ResumeThread(HandleThread);
procedure MyThread();stdcall;
var
begin
<Begin Loop>
case MyVar of
0:...
1:...
else ...
end;
<End Loop>
end;
Gandalf (2003-12-28 13:22:00) [2]Вот псевдо код, думаю идея ясна.
while not Terminated do
begin
DoSMTH(Start);
Suspend;
end;
....
Start:=123;
Resume;
....
miek (2003-12-28 13:20:00) [3]Mythread.Suspend;
MyThread.var1:= flag_perezapusk;
MyThread.Resume;
Юрий Ж. (2003-12-28 11:15:00) [4]А можно немного поподробнее и с примерчиком :)
miek (2003-12-28 00:22:00) [5]Остановить поток, изменить его состояние (переменные, объект и проч), затем запустить снова. А уж он сам должен видеть, что его перезапустили.