ПРИМЕРЫ ПРОГРАММИРОВАНИЯ КЛАВИАТУРЫ

Пример программы: с помощью стрелок можно управлять окружностью.

Exe-файл

Программа, которая показывает клавишу и ее код:

Program UsereadKey2;
Uses
  Crt;
Var
  C : Char;
Begin
  ClrScr;

  repeat
    C:= ReadKey;
    Writeln(C,' - ',ord(C)); writeln;   {Функция Ord, преобразовывает букву в ее числовой код}
  until C=#27  {код клавиши ESC}

End.