delphi 有获取键盘按键的控件吗?如果没有?解决思路

delphi 有获取键盘按键的控件吗?如果没有?
好象是什么类似键盘钩子的东西!

[解决办法]
在Edit的OnKeyDown事件中
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
ShowMessage(Key);
end;