delphi与键盘的关联是怎么实现的(敲键盘弹出窗口)

首先设置窗体的KeyPreview属性为True(所有按键窗体先接收)然后在窗体的OnKeyDown事件中写代码procedure TForm1.FormKeyPress(Sender: TObject;var Key: Char);begin if Key = 'a' then do something;end;