Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.04.03;
Скачать: CL | DM;

Вниз

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

 
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;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.024 c
6-6637
BabayS
2003-02-07 13:14
2003.04.03
IntraWeb компонеты и службы Win2000


1-6471
Фагот
2003-03-24 13:17
2003.04.03
Таблица символов


6-6631
dim-
2003-02-08 22:41
2003.04.03
webBrowse


3-6291
Alderman
2003-03-13 13:32
2003.04.03
Как натравить TQuery сразу на два TDataSource?


14-6702
Мазут Береговой
2003-03-19 04:14
2003.04.03
Вроде тут были люди, которые знакомы с .NET.