📅  最后修改于: 2022-03-11 14:55:37.990000             🧑  作者: Mango
procedure Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
begin
Key := #0;
ActiveControl := Edit2;
end;
end;