![]() |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
![]() |
Katrinka |
![]()
Сообщение
#1
|
Новичок ![]() Группа: Пользователи Сообщений: 17 Пол: Женский Реальное имя: Катя Репутация: ![]() ![]() ![]() |
Как в паскале в графическом режиме сделать так, чтобы програма не реагировала на нажатие клавиш, отличных от некоторых определенных клавиш?
(в графич. режиме выводится меню и слева рисуется прямоугольник. При нажатии на кнопку меню, программа выводит в этом прямоугольнике некоторый текст, затем пользователь вводит некоторый другой тект. Так вот, если после этого нажать какую-нибудь клавишу кроме стрелок, то прога начинает очень глючить. Что делать?) |
![]() ![]() |
Katrinka |
![]()
Сообщение
#2
|
Новичок ![]() Группа: Пользователи Сообщений: 17 Пол: Женский Реальное имя: Катя Репутация: ![]() ![]() ![]() |
Вот процедура, считывающая ввод пользователем:
function get_menu(start:integer; const menu_str:array of string; const size:integer):integer; far; var _stop:boolean; begin _stop:=false; repeat show_menu(start,menu_str,size); case readkey of #0: case readkey of #72: {vverh} if start>1 then dec(start); #80: {vniz} if start<size then inc(start); end; #13: {enter} _stop:=true; end; until _stop; get_menu:=start; end; |
![]() ![]() |
![]() |
Текстовая версия | 18.07.2025 17:18 |