[Guaho]

Код:

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

Это передача фокуса ввода следующему (в порядке номеров табуляции) элементу по нажатию Enter.