怎么让FORM响应键盘事件？

Question

用keydown看看
这样写 if key =13 then 
        showmessage('按了回车键');

Answer 1

procedure TForm1.FormKeyPress(Sender: TObject; var key:char);
begin
if key=65 then showmessage('asdf');
end;

Answer 2

你的form没有得到焦点，得到焦点就没有问题了。

Answer 3

procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if key = key_a then
    showmessage('adafa');
end;
错了，改成
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if key = 65 then
    showmessage('adafa');
end;

Answer 4

应该是Key=#65 或 Key=chr(65)或Key="A"（不是"a",也不是'A'）

Answer 5

key  =  key_a  
呵呵这个没错，
你要USES QT，就行了。
luoshumeng(乡村意外) 才说到了问题所在：）

Answer 6

都在OnKeyPress中，要响应上下键等，则到OnKeyDown中去