📅  最后修改于: 2022-03-11 15:00:47.332000             🧑  作者: Mango
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then // #13 = Return
begin
key := #0;
// Code...
end;
end;