1响应OnKeyPress事件。
此事件在用户键入某键时触发。
procedure TForm1.FormKeyPress(Sender:Object;var key:Char);
var
outmsg:string;
begin
outmsg := format('Key ''%s'' pressed',[key]);
Application.MessageBox(PChar(outmsg),'Information');
end;
onkeypress事件只能响应字符。
2.onkeydown事件在用户按下某键时触发。
onkeypress先触发，然后才是onkeydown.
3.onkeyup事件在用户释放按键是触发，必须删除Onkeydown和onkeypress才能响应。
本文转自鹅倌51CTO博客，原文链接： http://blog.51cto.com/kaixinbuliao/1011436，如需转载请自行联系原作者
