[Ferra]

ну уточнить надо было. Свойство default есть у TButton & TBitBtn. Может просто поставь другую кнопку?

или (любой из указанных способов подойдёт):

Код:

...
Form1.FeyPreview:=true;
...

//первый
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 if Key = VK_Return then ShowMessage('Enter pressed!');
end;

//второй
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  if Ord(Key) = 13 then ShowMessage('Enter pressed!');
end;