| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как прервать выполнение процедуры нажатием клавишы
Skyter © (2002-04-04 14:43:00)Как прервать выполнение процедуры нажатием клавишы "Esc"
Walker (2002-04-05 03:11:00) [1]ну это не совсем верно.... правильнее было бы сделать так: при нажатии ESC - вызывается событие... его обработать и установить некотрую переменную в TRUE (например ESC_was_pressed)
а процедура выглядеть должна так:
procedure MyProcedure;
begin
ESC_was_pressed:=FALSE;
while not(ESC_was_pressed) do
begin
// какие-либо действия
Application.ProcessMessages; // для того, чтоб можно было обработать нажатие клавишь, перемещения мыши, окна и т.п.
end;
end;
Song (2002-04-04 15:17:00) [2]Это она. Я ошибся, забыл. Извините.
Skyter (2002-04-04 15:10:00) [3]Не могу найти процедуру GetAsyncKeyStatus есть тока GetAsyncKeyState . Где ее искать?
Song (2002-04-04 14:57:00) [4]GetAsyncKeyStatus
Skyter (2002-04-04 14:52:00) [5]Необходимо чтобы при нажатии клавишы Esc , в процессе выполнения процедуры , прекратилось выполнение процедуры или функции, те выполнилась команда exit.
Иначе говоря в процессе выполнения процедуры опрашивать клаву на предмет состояния клавишы Esc.
Anatoly Podgoretsky (2002-04-04 14:45:00) [6]Exit
| |
