Пауза в выполнении программы

[Иллидан]

Как сделать, чтобы выполнение программы можно было остановить каким-то сочетание клавиш или кнопкой?(Аналог кнопки пауза)

[vitalik007]

зарегистрировать горячую клавишу

[Иллидан]

Сообщение от vitalik007

зарегистрировать горячую клавишу

В каком смысле? для меня необходимо, что-бы программу во время долго расчета можно было останавить, а потом, щелкнув скажем на кнопке "продолжить" продолжить ее выполнение.

[Квэнди]

Один из способов:
у любого компонента есть свойства tag
во время продолжительного вычисления используйте application.proccessmessages (могу ошибиться в написании)
чтобы обрабатывать сообщения от других компонентов
по нажатии на кнопку Пауза выставляйте Tag свойство некого компонента (например самой формы) в ,скажем, 1
По нажатию. на кнопку возобновления выставляйте Tag =0
в самой функции периодически проверяйте статус свойства Tag если оно 1 то
while XXX.tag<>0 do
application.proccessmessages;

[B_N]

Сообщение от Иллидан

В каком смысле? для меня необходимо, что-бы программу во время долго расчета можно было останавить, а потом, щелкнув скажем на кнопке "продолжить" продолжить ее выполнение.

Запускать расчет в отдельном потоке(ах), а по кнопке делать SuspendThread/ResumeThread. Заодно и интерфейс не будет тормозить.

[Иллидан]

Спасибо, все работает. Единственно, после того, как я нажал паузу я почему-то не могу закрыть форму(нажать крестик). Как это исправить?

[Stilet]

Мне кажется лучше всего будет всетки зарегистрировать горячую клавишу