[原創] 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);  調用的例子有：

ssCtrl in Shift

或者

[ssCtrl]

 

Edit調用示例：

KeyPress

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

 

KeyUp

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

這里 shift 不取值，故寫法 [ ]

 

Keydown

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

　　

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

 修改於：2019.08.15