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

Вниз

Как отловить нажатие на стрелки?   Найти похожие ветки 

 
KIR ©   (2002-04-19 09:53) [0]

сабж


 
Ally ©   (2002-04-19 10:09) [1]


procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case Key of
VK_LEFT: Label1.Caption := "Left arrow is pressed";
VK_RIGHT: Label1.Caption := "Right arrow is pressed";
VK_UP: Label1.Caption := "Up arrow is pressed";
VK_DOWN: Label1.Caption := "Down arrow is pressed";
else Exit;
end;
end;


Потянет?


 
Donal_Graeme   (2002-04-19 10:56) [2]

и Form.KeyPreview должно быть True.
и ещё, работать именно для стрелок это будет только если фокус ввода не находится на любом из контролов, так как в этом случае эти клавиши будут ими отрабатываться, и до формы дело не дойдёт.


 
handra ©   (2002-04-19 11:01) [3]

Cоздать ActionList, а в нем четыре Action с шот-катами Left, Right, Up и Down.


 
Donal_Graeme   (2002-04-19 11:06) [4]

и Form.KeyPreview должно быть True.
и ещё, работать именно для стрелок это будет только если фокус ввода не находится на любом из контролов, так как в этом случае эти клавиши будут ими отрабатываться, и до формы дело не дойдёт.


 
KIR ©   (2002-04-22 13:25) [5]

Спасибо, народ! Еще вопрс (уже чисто из-за любознательности). А почему это все работает только по OnKeyDown, а по OnKeyPress нет?


 
Song ©   (2002-04-22 13:28) [6]

На оnKeyPress нужно обрабатывать не коды клавиш,а символы, например
IF Key=#13 then ShowMessage("нажата Enter");


 
Виктор Щербаков ©   (2002-04-22 13:30) [7]

KIR © (22.04.02 13:25)
По туму, что OnKeyPress Occurs when a user presses a single character key. А стрелки к ним не относятся.


 
KIR ©   (2002-04-22 13:31) [8]

А зачем тогда нужно событие OnKeyPress?


 
panov ©   (2002-04-22 13:42) [9]

>KIR © (22.04.02 13:31)
Создавай новый Topic для новых вопросов.



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

Текущий архив: 2002.05.06;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.011 c
1-17623
velk
2002-04-23 09:28
2002.05.06
Как программно создать базу данных Access с помощью Delphi


1-17585
Stan Orlov
2002-04-22 15:35
2002.05.06
Подскажите компонент типа MDI-Tab ...


6-17648
RoGa
2002-02-17 09:21
2002.05.06
Нужно сделать прокси!


3-17473
AlexP
2002-04-10 21:08
2002.05.06
Мастера, подскажите.


14-17701
LionR
2002-03-27 18:16
2002.05.06
pack таблицу dbf