Bueno, aquí va otra alternativa:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = 13 then
SelectNext(Screen.ActiveControl, True, False);
end;
No olvides cambiar la propiedad "KeyPreview" de la forma a "True" para que esto funcione...
Saludos
..-._.-._ReLoAd-._.-._....