Надо регистрировать горячие клавиши!
Код:
private
procedure WMHotKey(var Msg: TMessage); message WM_HOTKEY;
...
procedure TForm1.FormCreate(Sender: TObject);
begin
RegisterHotKey(Handle, VK_RETURN, 0, VK_RETURN);
end;
procedure TForm1.FormDestroy(Sender: TObject);
begin
UnRegisterHotKey(Handle, VK_RETURN);
end;
procedure TForm1.WMHotKey(var Msg: TMessage);
begin
// код, который будет выполняться, при нажатии на ENTER
end;