Problemas con Perform(WM_NEXTDLGCTL,0,0)
 

Cordial saludo,
Trabajo con Delphi XE7 y tengo 5 DBEdit a los cuales les asigne la propiedad OnKeyPress lo siguiente:

Código Delphi [-]
if Key = #13 then
  if (Sender as TDBEdit).Name = 'DBEdit5' then
    DBEdit1.SetFocus
  else
    Perform(WM_NEXTDLGCTL,0,0)

Todo funciona bien, pero si hago alguna edicion en DBEDIT2, DBEDIT3 o DBEDIT4 al dar ENTER siempre me mandan al DBEdit1.

Que puedo hacer para solucionar esto?

Desconozco el resto del código, por lo que no sé que eventos estarás capturando durante la ejecución, pero una prueba simple en mi Delphi XE7 con tu código de captura de la tecla me funciona perfectamente, así que el problema debe venir por otro lado

Sin saber más es difícil darte una solución

Saludos