Форум: "Основная";
Текущий архив: 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.008 c