请教各位大虾，在delphi中怎样给一个窗体上的button定义热键？

Question

如题。

Answer 1

在该button的caption属性中写： &A  即可用 alt+A 这个热键来控制此按钮。                        同样：&B  就是alt+B 
                           ……

Answer 2

呵呵说明一下：  &这个符号就是shift+7得来的那个符号。

Answer 3

这个我知道。我是说比如我要把button1的热键定义为‘a’或‘A’呢？

Answer 4

如果是要用'a‘的话截取消息！！如果是组合键，用ShortCut属性

Answer 5

Form的KeyPreview设为true
然后在Form的OnKeyPress中判断

Answer 6

在Form的OnKeyPress中判断
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
   if key='a' then
   调用你要的button的程序
end;