取得Enter键_OnKeyPress

功能说明:取得Enter键 
procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: Char); 
begin
    IF key=#13 then   showmessage('你按下了Enter键');
end;




原文地址:https://www.cnblogs.com/xe2011/p/2527409.html