Всё о клавиатуре

[Freek]

Расскажите ктонибудь о перехвате кнопок...

[Carbon]

type
  TForm1 = class(TForm)
  private
    { Private declarations }
  protected
    procedure WMKey(var msg:TWMKey);message WM_KEYDOWN;
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.WMKey(var msg:TWMKey);
begin
  if msg.CharCode=VK_LEFT then
    Caption:='left'
end;

Процедура перехватывает сообщения Windows о нажатии кнопки. Процедура должна иметь специальное описание (см. выше).

[Freek]

а кнопа после выполнения задачи выполнит задание в виндовс?

[Carbon]

По идее не должна, хотя я не пробовал.

[rpy3uH]

ищи по форуму "SetWindowsHookEx" или "хуки"

[Квэнди]

Хуки самое правильное, а в первом варианте передавай в нужное время управление стандартному обработчику. Inherited;