☆リターンキーで移動させる。

なんだっけ？なんだっけ？となかなか思い出せず、過去のプログラムを 調べて、ようやく見つけた出した SelectNext！超、超、超いまさらですが、書いておきますね。

Form1のKeyPreviewをTrueにする必要があります。

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  //リターンキーで移動させる
  if Key = #13 then
  begin
    SelectNext(ActiveControl, True, True);
    Key := #0;
  end;
end;