Скачать: 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.979 c