Помощь - Поиск - Пользователи - Календарь
Полная версия: Ascii коды клавиатуры
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Lidroot
Подскажите какие коды у клавиш PageUp и PageDown. Может кто нибудь выложит полную таблицу?
volvo
А может быть, кто-нибудь уже начнет, наконец, пользоваться поиском?
движение по стрелкам

(внимательно читать ВСЮ тему!)
Lidroot
Спасибо volvo! я пытался искать но ничего не нашел! Эта тема 2004 года smile.gif
APAL
Этот код написан лет 5-8 назад.... и до сих пор работает (хотя можно и оптимизировать немного).
Надеюсь теперь не будет вопросов про коды клавиш.

Uses Crt;
Var Ch : Char;
Begin
ClrScr;
Ch:=#0;
Repeat
While KeyPressed do
Begin
Ch:=ReadKey;
GoToXY(15,1); Write(' ');
If Ch=#0 then
Begin
Ch:=ReadKey;
GoToXY(15,1); Write('#0');
End;
GoToXY(1,1); Write(Ch,' ');
GoToXY(10,1); Write(Ord(Ch),' ');
End;
Until Ch=#27; {выход по нажатию ESC}
End.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.