остановка цикла

[dgoc]

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

[Alex11223]

Я думаю, что надо исправить обработчик события нажатия некой кнопки Стоп в некой программе, чтоб она не висла.

[dgoc]

Alex11223, а конкретней можно?

[Alex11223]

Какой вопрос — такой и ответ.

[MyLastHit]

application.processmessages(); в цикле не поможет?
(это я исхожу из того что вы на Delphi пишете, почему язык не указываем? Или как все- забыл?)

[dgoc]

MyLastHit спасибо. Вроде сработало. Пишу действительно на Delphi, запарился.
Alex11223 объясню на примере.
На форме 2-е кнопки: Пуск и Стоп. По нажатию Пуск запускается цикл: переменная Х увеличивается на 1, пока не будет нажата кнопка Стоп. Однако во время выполнения цикла реакции на нажатие кнопки Стоп нет. Так понятнее?

Если есть еще варианты пишите.

[DoubleTrouble]

можно таймер с интервалом 1 поставить и цикл там выполнять(точнее не надо писать for i:=1 to maxint), он сам до бесконечности увеличивать будет x. А вот в кнопке стоп написать timer1.enebled:=false; а на Пуск timer1.enebled:=true;. но это как то по детски и в секунду он только тысячу к X прибавить

[MyLastHit]

и в секунду он только тысячу к X прибавить

timer1.interval:=....
Ваш алгоритм мягко говоря странный, вы еще в отдельном потоке счетчик отгрохайте, чтоб совсем наверняка... работодатель такого никогда не примет, да и преподаватель тоже. Чтобы цикл не тормозил работу программы нужно использовать

application.processmessages();

всё.