[kapcomx]

ke tal compañero prueba este simple cosigo

Código Delphi [-]
 
 
begin
   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
end;

Fuente: facil de encontrar en Goo....