Форум программистов, компьютерный форум, киберфорум
C++ Builder
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.84/43: Рейтинг темы: голосов - 43, средняя оценка - 4.84
3 / 3 / 0
Регистрация: 26.06.2011
Сообщений: 108

Событие по нажатию клавиши

17.12.2011, 23:54. Показов 8853. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте. Помогите разобраться как сделать, чтобы при нажатии клавиши ESC выдавало сообщение.
C++
1
2
3
4
5
6
7
void __fastcall TfrMainJ_Gas_Equip::FormKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
  if (Key == 27) {
  MessageDlg("Нажата клавиша ESC.", mtInformation,TMsgDlgButtons()<<mbOK ,0);
}
}
1
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
17.12.2011, 23:54
Ответы с готовыми решениями:

Прекратить отрисовку объекта по нажатию клавиши
Здравствуйте, ребят. Срочно нужна помощь. Есть бесконечный цикл рисующий квадрат и перемещающий его по оси Х. Нужно чтобы при нажатии...

Событие по нажатию на строку грида
Здравствуйте, Снова я со своими тараканами С++ я не так часто жалую, но вот приспичило ну так вот. Есть DBgridEh соответственно в него из...

По нажатию клавиши Enter считать и записать в массив число
У меня есть 81 Edit каждый с которых создается при создании формы, мне нужно например написать 6 и нажать Enter и после чего должно это...

6
 Аватар для cpp_developer
20124 / 5691 / 417
Регистрация: 09.04.2010
Сообщений: 22,546
Записей в блоге: 1
18.12.2011, 00:04
C++
1
2
3
4
5
6
void __fastcall TFOrm1::ApplicationEvents1ShortCut(TWMKey &Msg, bool &Handled)
{
  if (Msg.CharCode == 0x1B) { // Клавіша ESC Esc 27 0x1B  VK_ESCAPE
    MessageDlg("Нажата клавиша ESC.", mtInformation,TMsgDlgButtons()<<mbOK ,0);
  }
}
Добавлено через 1 минуту
или в OnKeyPress и Key->Preview = true;
0
3 / 3 / 0
Регистрация: 26.06.2011
Сообщений: 108
18.12.2011, 00:56  [ТС]
Спасибо большое. Может подскажите еще по одному вопросу. Хочу реализовать поиск по первым введенным буквам фамилии. На форме есть StringGrid, в который должен выводиться результат.
C++
1
2
select * from ABON A where A.NAIM CONTAINING +DOP_SQL 
где DOP_SQL='Кура'
Как сделать, чтобы при каждом нажатии клавиши запускалась процедура
C++
1
2
3
4
if ((Key == 'А') ||(Key == 'а') )
{
DOP_SQL='А'
}
0
 Аватар для cpp_developer
20124 / 5691 / 417
Регистрация: 09.04.2010
Сообщений: 22,546
Записей в блоге: 1
18.12.2011, 01:14
Aden, идите как вы сюда
C++ Builder и базы данных
и сделайте себе там тему со своим вопросом .
0
11 / 11 / 6
Регистрация: 03.04.2011
Сообщений: 631
18.12.2011, 06:48
Цитата Сообщение от LK Посмотреть сообщение
Клавіша ESC Esc 27 0x1B *VK_ESCAPE
а есть какой нибудт списочек где все коды клавишь перечисленны вот у ESC 0х1B, а коды других есть?
0
 Аватар для Samrisbe
1365 / 732 / 67
Регистрация: 28.01.2011
Сообщений: 2,069
18.12.2011, 09:52
Про гуголь не забываем...
Виртуальные коды клавиш
1
Практикантроп
 Аватар для nick42
4841 / 2726 / 534
Регистрация: 23.09.2011
Сообщений: 5,798
18.12.2011, 13:26
Цитата Сообщение от lexflax Посмотреть сообщение
где все коды клавишь перечисленны
... зачем далеко ходить? - в директории Include файлы лежат: winuser.h, winuser.rh. Там всё это в виде списка. Тоже поиском можно найти; не обязательно Гугль напрягать.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
18.12.2011, 13:26
Помогаю со студенческими работами здесь

Событие на нажатие клавиши клавиатуры
для Label1 нажимаю клавишу с клавиатуры например a . И должен получить событие например Label1-&gt;Color=clRed; ...

Событие по нажатию клавиши
Доброго времени суток. Нужно создать событие по нажатии enter: Procedure TForm1.KeyDown(Sender: TObject; var Key: Word; Shift:...

Событие по нажатию клавиши
Вопрос чайника Пример: Имеется элемент textbox, куда вводится пароль. А так же есть button &quot;готово&quot; Необходимо, чтобы...

Событие по нажатию любой символьной клавиши
Возможно ли реализовать событие по нажатию любой символьной клавиши кроме пробела, при любой раскладке клавиатуры на KeyPress, не...

Собственное событие по нажатию клавиши Alt
Задание: Разработать собственное событие на нажатие клавиши ALT. Консольный вариант. Подскажите как это сделать, чтобы событие в ALT.cs...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока
igorrr37 16.01.2026
/ * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит переходные токи и напряжения на элементах схемы. . . .
Восстановить юзерскрипты Greasemonkey из бэкапа браузера
damix 15.01.2026
Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
Classic Notepad for Windows 11
Jel 10.01.2026
Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
Почему дизайн решает?
Neotwalker 09.01.2026
В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru