Claro esta también debemos adapta el evento KEypress de nuestro formulario
Código Delphi
[-]procedure TFXPAF.FormKeyPress(Sender: TObject; var Key: Char);
begin
if (Key = #13) then
if (ActiveControl is TEdit)
or (ActiveControl is TDBEdit)
or (ActiveControl is TDBNewEditJL)
or (ActiveControl is TNewDBSpinEdit)
or (ActiveControl is TNewDBSpinEditDouble)
or (ActiveControl is TDBComboBox) then
begin
Key := #0;
Perform(WM_NEXTDLGCTL, 0, 0);
end;
end;