Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.04.25;
Скачать: CL | DM;

Вниз

Как остановить бесконечный цикл?   Найти похожие ветки 

 
vovan13 ©   (2002-04-14 18:17) [0]

Опишу мой вопрос на упрощенном примере.
На форме есть две кнопки "Старт" и Стоп".
При нажатии на "Старт" запускается бесконечный цикл, в теле которого
происходит проверка на условие выхода из цикла - IF U=TRUE then BREAK.
Кнопка "Стоп" и присваивает переменной U значение TRUE, чтобы остановить цикл.
Проблема в том, что после нажатия на "Старт" приложение не реагирует на нажатие других кнопок,
т.е. не вызывается событие onClick кнопки "Стоп".
Что мне нужно сделать, чтобы приложение озывалось на нажатие кнопки "Стоп" во время выполнения бесконечного цикла?


 
ION T ©   (2002-04-14 18:35) [1]

В цикл впиши Aplication.ProcessMessages (куда хочешь, я обычно в конце пишу)

К тому-же проверка буля выглядит крассивее без приравнивания:
IF U then BREAK или IF NOT U then BREAK, хотя может это только мое мнение.....


 
Anatoly Podgoretsky ©   (2002-04-14 18:36) [2]

Надо обрабатывать сообщение системы в цикле, смотри ProcessMessages



Страницы: 1 вся ветка

Текущий архив: 2002.04.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.011 c
14-81033
VuDZ
2002-03-18 15:43
2002.04.25
нейросети в экономике


3-80780
слава
2002-04-04 15:02
2002.04.25
Перевод таблиц из Delphi в Access


14-81072
Suntechnic
2002-03-20 22:37
2002.04.25
Вот, наткнулся в Инете....


3-80823
Alexandr_
2002-04-05 15:00
2002.04.25
ODAC. Проблема с чтением из BLOB


14-81066
Fellomena
2002-03-18 18:46
2002.04.25
Возможна ли связка *.lib от Фортрана с Delphi проектами ?