Usando a tecla ENTER para saltar entre os campos de um formulário

Para usar a tecla ENTER para saltar entre os campos de um formulário no lugar da incômoda tecla TAB, digite o código a seguir no evento onKeyPress de todos os componentes TEdit ou TDBEdit do formulário:

if key = #13 then
 begin
   key := #0;
   PostMessage(handle, WM_KEYDOWN, VK_TAB, 1);
 end;