Focus

[Ruben_Cu]

Hola Cronos, el código siguiente responde a tu pregunta:

if Key = #13 then                          { if it's an enter key }
   begin
       Key := #0;                                 { eat enter key }
       Perform(WM_NEXTDLGCTL, 0, 0);              { move to next control }
   end

La fuente es el truco nº 1 del web site de trucomanía, visitala para mas información.
Debes colocarlo en el evento OnKeypress de un control y asociarle el mismo evento de todos los demás controles.
Saludos