Pascal abc:
Например, у меня есть функция 'show' и нужно сделать так, чтобы она выполнялась при нажатии какой-нибудь кнопки, любой, допустим, P, как реализовать?
(слышал о readkey, но как воспользоваться? ) Покажите, пожалуйста, кто знает.
Функция ReadKey (читать клавишу) ожидает нажатия клавиши на клавиатуре, после чего возвращает симврол (тип CHAR), соответствующий нажатой клавише. При этом символ клавиши на экран не выводится. Используя эту функцию, можно обрабатывать нажатия служебных клавиш, таких как - < F1-F12>,клавиш перемещения курсора и листания текста страницами. При нажатии служебных клавиш ReadKey возвращает 0. Чтобы получить номер служебной клавиши, нужно еще раз вызвать ReadKey.
Ниже приведена программа, которая позволяет определить код нажатой клавиши. Программа завершает работу при нажатии клавиши
Program tt;
Uses crt;
Var
ch:char ;
Begin
repeat
ch:=ReadKey;
if ch:=chr(0) then {нажата служебная клавиша}
begin
writeln(‘Служебная кавиша’);
ch:=ReadKey;
end;
writeln(ord(ch));
until ord(ch) = 27; { пока не нажата клавиша
End.
⇢