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?