[ApplicatiOn]

С нажатием кнопок тоже легко на клавиатуре..

Код:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
case Key of
VK_F1
begin
Button1.Click;
end;

И при нажатии F1 будет нажата кнопка Button1 вроде как

ток в Events укажи