Delphi - Fazendo o Enter se Comportar como o Tab

No evento KeyPress do Form, digitar as linhas abaixo:

if Key = #13 then //#13 é o código que representa o Enter em ASCH
   begin
      Key := #0; // Ttira o ruído quando pressiona o Enter.
      Perform(WM_NEXTDLGCTL,0,0); //Passa o foco para o próximo componente na tela
   end;

A rotina completa ficaria assim:

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then
  begin
      Key := #0;
      Perform(WM_NEXTDLGCTL,0,0);
   end;
end;