![]() |
|
Модераторы: Snowy, MetalFan, bems, Poseidon |
![]()
|
|
| San4o_Pan4o |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 70 Регистрация: 16.12.2007 Репутация: нет Всего: нет |
Всем здрасьте! Есть прога по вычислительным методам, решает систему + одновременно рисует график погрешности. Все это происходит в внутри большого цикла while(). Цикл может тянутся долго, и хочется иметь возможность его остановить в любой момент, типа кликнул кнопочку и оно стопанулось. Как можно сделать, подскажите плиз. И, если можно, с кодом..
|
|||
|
||||
| Frees |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 2233 Регистрация: 2.12.2005 Где: Екатеринбург Репутация: 16 Всего: 54 |
Application.ProcessMessage;
и флаг для прекращения цикла -------------------- Кольцов Виктор Владимирович |
|||
|
||||
| vladimir74 |
|
|||
![]() Бывалый ![]() Профиль Группа: Участник Сообщений: 241 Регистрация: 28.11.2006 Репутация: нет Всего: 3 |
--------------------
* В доме помешанного не говорят о миксере.* На любой Ваш вопрос у меня есть любой мой ответ. |
|||
|
||||
| Sanek123 |
|
|||
![]() Бывалый ![]() Профиль Группа: Участник Сообщений: 201 Регистрация: 22.10.2008 Репутация: нет Всего: нет |
По моему можно воспользоваться кострукцией repeat ... until
типа: Repeat ... цикл ... until button.click; цикл будет при выполнении нового круга проверять не была ли нажата кнопка стопа. --------------------
Вас разыскивают бойцы 139-го порта... |
|||
|
||||
| Frees |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 2233 Регистрация: 2.12.2005 Где: Екатеринбург Репутация: 16 Всего: 54 |
Repeat
... цикл//во тут у тебя прога зависнет и не сможеш ты ничего нажать ... until button.click; -------------------- Кольцов Виктор Владимирович |
|||
|
||||
| THandle |
|
|||
![]() Хранитель Клуба Награды: 1 Профиль Группа: Админ Сообщений: 3639 Регистрация: 31.7.2007 Где: Moscow, Dubai Репутация: 50 Всего: 372 |
Никаких флагов, никаких циклов, использовать следует потоки.
http://forum.vingrad.ru/index.php?showtopi...t&p=1757937 http://forum.vingrad.ru/forum/topic-220051...25BA/index.html |
|||
|
||||
| San4o_Pan4o |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 70 Регистрация: 16.12.2007 Репутация: нет Всего: нет |
всем спасибо, ProcessMessages помогло
тему можно прикрыть) |
|||
|
||||
| Frees |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 2233 Регистрация: 2.12.2005 Где: Екатеринбург Репутация: 16 Всего: 54 |
это решение для начинающих, не совсем удобное, например попробуй закрыть приложение когда выполняется цикл. если хочеш сделать все правельно кури TThread и слушай THandle, -------------------- Кольцов Виктор Владимирович |
|||
|
||||
![]()
|
| Правила форума "Delphi: Для новичков" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Для новичков | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |