Question

delphi edit如何利用回车控制光标移动

Answer 1

如果Edit控件比较多,可以这样：
Form1.KeyPreview设置成True。
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if (key=#13) and (activecontrol is Tedit) then
begin
key:=#0;
perform(wm_nextdlgctl,0,0);
end;
end;

Answer 2

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
Edit2.SetFocus;
end;