[原创] delphi KeyUp、KeyPress、Keydown区别和用法，如何不按键盘调用事件

KeyPress (Sender: TObject; var Key: Char);   当用户按下键盘上的字符键（字母，数字）　会触发该事件，功能键则不会（F1-F12,Ctrl,Alt,Shift）

KeyUp (Sender: TObject; var Key: Word;Shift: TShiftState);    当按下键盘上的按键松开时，会触发OnKeyUp事件(任意一个按键都会触发)

Keydown(Sender: TObject; var Key: Word;Shift: TShiftState);    按下任意一个按键都会触发该事件

 

KeyPress 和其他两个的区别是，Key 的取值是字符 ，其他的是数字（word  0·65535）

特别注意的是Shift:TShiftState  它的取值是：TShiftState = set of (ssShift, ssAlt, ssCtrl,ssLeft, ssRight, ssMiddle, ssDouble);  调用的例子有：

?

1	ssCtrl in Shift

或者

?

1

[ssCtrl]

 

Edit调用示例：

KeyPress

?

1 2 3 4 5 6

var   key:char begin   key:='#13'；   EditKeyPress(nil,key); end；

 

KeyUp

?

1 2 3 4 5 6

var   key:word begin   key:=13；   EditKeyUp(nil,key,[]); end；

这里 shift 不取值，故写法 [ ]

 

Keydown

?

1 2 3 4 5 6

var   key:word begin   key:=13；   EditKeydown(nil,key,[]); end；

　　

 来源：https://www.cnblogs.com/guorongtao/p/11302949.html

 修改于：2019.08.15