[[Bicho]]

Hola puedes hacer lo siguiente:

Código Delphi [-]
if key = 13 then begin
      Key := #0; //cambiamos la tecla por tab
      Perform(WM_NEXTDLGCTL, 0, 0); //pasamos al siguiente control
end;

Espero te sirva

Saludos