Como substituir o tab pelo entrer?

Este comando passa o foco para o próximo controle.

1
2

{ Este comando tem o mesmo efeito do tab }
Perform(WM_NEXTDLGCTL, 0, 0);

Então para simular o efeito do tab com o entrer,
deve ser feito dois passos:

Passe a propriedade KeyPreview do formulário para True.

Depois siga exemplo do códido a ser inserido no evento OnKeyDown do formulário.

1
2
3
4
5
6

{ Exemplo de uso, substituindo o tab pelo enter }
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
  if Key = VK_RETURN then
    Perform(WM_NEXTDLGCTL, 0, 0);
end;

Como alternativa, existem componentes que fazem este tipo de tarefa, como por exemplo,
o componente JvEnterAsTab da biblioteca do jedi, outro componente é o ACBrEnterTab
da biblioteca do ACBr.

Ambos são open source.