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

Вниз

Как прервать выполнение процедуры нажатием клавишы   Найти похожие ветки 

 
Skyter ©   (2002-04-04 14:43) [0]

Как прервать выполнение процедуры нажатием клавишы "Esc"


 
Anatoly Podgoretsky ©   (2002-04-04 14:45) [1]

Exit


 
Skyter ©   (2002-04-04 14:52) [2]

Необходимо чтобы при нажатии клавишы Esc , в процессе выполнения процедуры , прекратилось выполнение процедуры или функции, те выполнилась команда exit.
Иначе говоря в процессе выполнения процедуры опрашивать клаву на предмет состояния клавишы Esc.


 
Song ©   (2002-04-04 14:57) [3]

GetAsyncKeyStatus


 
Skyter ©   (2002-04-04 15:10) [4]

Не могу найти процедуру GetAsyncKeyStatus есть тока GetAsyncKeyState . Где ее искать?


 
Song ©   (2002-04-04 15:17) [5]

Это она. Я ошибся, забыл. Извините.


 
Walker ©   (2002-04-05 03:11) [6]

ну это не совсем верно.... правильнее было бы сделать так: при нажатии ESC - вызывается событие... его обработать и установить некотрую переменную в TRUE (например ESC_was_pressed)

а процедура выглядеть должна так:

procedure MyProcedure;
begin
ESC_was_pressed:=FALSE;
while not(ESC_was_pressed) do
begin
// какие-либо действия

Application.ProcessMessages; // для того, чтоб можно было обработать нажатие клавишь, перемещения мыши, окна и т.п.
end;

end;




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

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

Наверх




Память: 0.48 MB
Время: 0.012 c
14-1194
Igor_thief
2002-05-31 15:17
2002.07.01
Компрессоры


14-1160
Pretavius
2002-05-30 01:53
2002.07.01
Необходимо


1-1101
koks
2002-06-19 13:57
2002.07.01
переименовать модуль :((


8-1106
Саша
2002-02-20 17:40
2002.07.01
Подушечные изображения


1-943
ZG
2002-06-19 16:10
2002.07.01
Здарово!!! не подскажите как в Турбо Паскале использовать метод р