请教各位大大,比如,在button上可以用&F来做快捷方式,但如果我想用F4来做快捷方式,该如何做呢?

您好：
在窗体上放入一个ActionList1,新建一个Action1 指定其shotcut为F4，指定其OnExecute对应Button的Click事件即可！试试看，是不是您想要的效果！

編輯記錄

或者你可以考慮在Form的on KeyDown事件指定熱鍵

[code delphi]
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
case Key of
VK_F4:ShowMessage('F4 Clicked');
{...}
end;
end;
[/code]

編輯記錄

感谢deity和00156两位大大的关注,二位的方法都很好用,各有千秋,小弟不胜感激!因为只有一分,所以很为难,不过因为deity大大分数很高,小弟就把分给00156大大了

另:在用00156大大的方法时,补充一点,那就是必须先设Form.KeyPreview :=Ture;

再次感谢!

編輯記錄