Вниз
Скачать: CL | DM;

Код клавиши   Найти похожие ветки 

 
KyRo   (2005-07-09 10:45) [0]

Не могу найти в Windows.pas коды  клавиш Page up , Page Down , Enter  Может кто знает подскажите ?


 
TUser ©   (2005-07-09 11:01) [1]

Для каких целей это надо? См. vk_xxx и #13


 
KyRo   (2005-07-09 11:10) [2]

Мне нужно перехватить их нажатия в программе. VK_xxx их там вроде нет , есть только инсерт и делит . А что за #13 ?


 
Virgo_Style ©   (2005-07-09 11:17) [3]

VK_PRIOR = 33;
VK_NEXT = 34;
VK_RETURN = 13;

Вроде так.


 
TUser ©   (2005-07-09 11:18) [4]

> Мне нужно перехватить их нажатия в программе.

В конкретном компоненте - OnKeyDown, OnKeyUp. Туда передается параметр Key, который можно проверить на равенство с VK_PGUP и др. (точно константы я не помню, но что-то типа этого) Если глобально - см. TActionList.


 
TUser ©   (2005-07-09 11:18) [5]

> А что за #13 ?

Символ в номером 13, соответсвует клавише Enter. Можно ловить в OnKeyPress.


 
KyRo   (2005-07-09 11:21) [6]


> Virgo_Style ©   (09.07.05 11:17) [3]
> VK_PRIOR = 33;
> VK_NEXT = 34;
> VK_RETURN = 13;
>
> Вроде так.


> TUser ©   (09.07.05 11:18) [5]
> > А что за #13 ?
>
> Символ в номером 13, соответсвует клавише Enter. Можно ловить
> в OnKeyPress.


Спасибо щас буду пробовать.


 
palva ©   (2005-07-09 11:21) [7]

procedure TForm1.KeyDown(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
 if Key = VK_NEXT then ShowMessage ("PgDown");
 if Key = 13 then ShowMessage ("Enter")
end;



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c
3-1118292009
Rat
2005-06-09 08:40
2005.07.25
Добавить колонку в ДБ-грид, если там уже есть результат SQL-запро


14-1120352779
Cheater
2005-07-03 05:06
2005.07.25
"Ведьма из Блэер". Чем кончилось?


14-1120200294
Sha
2005-07-01 10:44
2005.07.25
Пятница - задача - снова монеты


1-1120113261
intaari
2005-06-30 10:34
2005.07.25
внесение изменений в memo готового отчет, fastreport 3.0


8-1111831947
Quattro
2005-03-26 13:12
2005.07.25
выезжающая картинка




   Наверх