Delphi Support

А если брякнуть? Break ...

 

Не выход, цикл же в потоке, ну выйдет поток из цикла, а дальше, до уничтожения пройдёт не мало времени, если уничтожение будет плавное. А остановка подразумивает моментальное. А если даже уничтожется, например я хочу остановить, что бы таймаут поменять и дальше запустить.

 

В это случае думаю пауза предусмотрена , то есть Suspended.
Может быть так сделать, Work:=false goto и на разрушение потока.

 

тут все зависит от того, как ты создаешь потоки. как и идет работа в потоке.
если ты создаешь поток таким образом ( пример )

Код:

var MyThread: TMythread; // тут ты объявляешь переменную с типом названия потока
MyThread:=TMyThread.Create(true); // что значит true или false. Если в параметрах данного метода стоит true, то поток будет запущен только после того, как ты запустишь его через Resume. Если стоит false, то поток начнет свою работу сразу после создания.
MyThread.Resume; // это приводит поток в работу

Чтобы остановить поток, запущенный через Resume, и с методом создания true, нужно всего лишь прописать:

Код:

MyThread.Terminate; // это убьет поток
MyThread.Suspend; // это поставит поток на паузу

 

если приложение многопоточное, то остановить потоки можно циклом:

Код:

for i:=0 to Thread do begin
Thread:=-1;
end;

Этот цикл будет вычитать 1 поток, пока количество потоков, созданное приложение не станет равным нулю. Когда потоки будут равны нулю, работа потоков будет остановлена.

 

Вопрос в том ,как мгновенно остановить потоки... Без постепенного завершения.

 

читай внимательно сообщение мое!

 

Я все читал внимательно. Если останавливать циклом. Это постепенная остановка. А Terminate всего лишь вызывает процедуру Terminated которая так же постепенно завершает и уничтожает потоки. Я уже предложил бряк + гото. Думаю сойдёт

 

остановить потоки мгновенно невозможно. если только убить программу
бряк не сработает

 

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

 

Мгновенно нет, но несколько миллисекунд займёт засыпание потоков, не более. Времени надо ровно столько, сколько ОС переключиться между потоками и выделить им процессорного времени.

 

Так что мне делать с чатом то? Как засунуть его в форму дельфи? :D

 

если только создать мемо и в него выводить сообщения пользователей.