delphi中SpeedButton怎么响应键盘！比如程序执行后，我按enter键，project中的button得到响应！

Question

delphi中SpeedButton怎么响应键盘！比如程序执行后，我按enter键，project中的button得到响应！是speedbutton，好像是keyup什么的！忘了！最好给点实例！

Answer 1

if Key=#13 then
SpeedButtonClick(Sender);

Answer 2

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  if key=chr(13) then
   self.SpeedButton1.OnClick(nil);
end;procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
  self.SpeedButton1.Caption:='C!';
end;

Answer 3

ActionList控件,他就在Standart页
双击空间，在其中加入一条Action1，将Action1事件属性OnExecute指向你的SpeedButton1Click事件，设置shortcut属性为你的快捷键即可。