Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Application.Terminate [D6]


Anisa ©   (2004-07-22 13:09:00) 

Уважаемые Мастера, как прервать корректно задачу, т.е. отработать допустим нажатие 'Esc'?
Почему-то if (Key = 27) then  Application.Terminate; не отрабатывается, т.е. в if заходит, условие True, но Application не завершает


ИдиотЪ   (2004-07-22 14:13:00) [1]

Анонимщик ©
пока из приведенного примера не видно, что там
хотя можно замутить выполнение и с помощью Application.ProcessMessages


Анонимщик   (2004-07-22 13:40:00) [2]

В справке написано, что Terminate посылает сообщение, а не немедленно завершает программу. Поэтому, если код имеет, напимер, такой вид:

while (...) do
begin
if (Key = 27) then  Application.Terminate;
end;

то ничего не произойдет, пока условие не перестанет выполняться


Ega23   (2004-07-22 13:36:00) [3]

if (Key = 27) then MainForm.Close;


ИдиотЪ   (2004-07-22 13:31:00) [4]

Анонимщик ©  
и что, что читал(а) ?


Анонимщик   (2004-07-22 13:28:00) [5]

А что у тебя после
if (Key = 27) then  Application.Terminate
Справку по Terminate читал?


Наверх

Титульная страница Поиск, карта сайта Написать письмо