Pon la propiedad KeyPreview de tu Form a True
luego en la función KeyPrees de tu form has lo siguiente:
Código Delphi
[-]
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
inherited;
If Key = #13 Then begin
SelectNext(ActiveControl as tWinControl, True, True );
Key := #0;
end;
end;
Saludos