Форум: "Основная";
Текущий архив: 2005.07.25;
Скачать: [xml.tar.bz2];
ВнизКод клавиши Найти похожие ветки
← →
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 вся ветка
Форум: "Основная";
Текущий архив: 2005.07.25;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.012 c