Utilizar el enter por el tab

[Jvilomar]

Yo utilizo esta rutina es casi la misma que la tuya. En el onKeyPress, pero antes tienes como dice Marcos que poner la propiedad KeyPreview del Formulario := True y chequear el TabOrder de cada uno de los dbEdit

Código Delphi [-]
   Begin
       if key =#13 then
          begin
          SelectNext(ActiveControl,true,true);
          End
   End;

Espero que te sirva....