Форум: "Основная";
Текущий архив: 2003.04.03;
Скачать: [xml.tar.bz2];

Вниз

Перехват нажатий клавиши дополнительной клавиатуры   Найти похожие ветки 

← →
SZap   (2003-03-23 15:55) [0]

пишу:
procedure TFMain.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Key >= 48) and (Key <= 57) then
.......
else
.......
end;
срабатывают кнопки 0..9 тотолько основной клавиатуры, как сделать, чтобы срабатывали и дополнительной цифровой клавиатуры?

---

← →
Anatoly Podgoretsky   (2003-03-23 16:11) [1]

Все виртуальные клавиши приведены в справке по теме Virtual-Key Codes

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.04.03;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.009 c