KEY

← →
Id (2006-06-29 16:08) [0]

Здраствуйте, уважаемые мастера.
Как поймать событие - нажатие кнопки UP или DOWN

← →
Phoroon~ (2006-06-29 16:17) [1]

А событие где ловить то?
Варианты:
1 Формой
2 Проектом
3 Компонентом
4 Еще чем нибудь (уточнить)

← →
Id (2006-07-10 15:09) [2]

> 3 Компонентом

← →
КиТаЯц © (2006-07-10 15:12) [3]

procedure OnКомпонентKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key in [VK_Up, VK_DOWN] then showmessage ("Ïîéìàëè îäíàêî"); end;

← →
alexvan © (2006-07-10 15:16) [4]

1.Свойство формы KeyPreview:=true;

2.Для компонента событие OnKeyDown
if Key=VK_UP then ...
if Key=VK_DOWN then ...

← →
Id (2006-07-10 15:24) [5]

> КиТаЯц © (10.07.06 15:12) [3]

Ругается
[Error] Unit1.pas(27): Incompatible types: "Char" and "Integer"

> alexvan © (10.07.06 15:16) [4]

Ругается
[Error] Unit1.pas(27): Incompatible types

> [Error] Unit1.pas(27): Incompatible types: "Char" and "Integer"

не OnKeyPress, а OnKeyDown.

← →
Id (2006-07-10 15:41) [7]

Спасибо, работает!

KEY Найти похожие ветки