안녕하세요? 누리빛입니다.
정말 오랫만의 답변이네요~ 좀~ 자주 와야 하는데...
type
TKeyEvent = procedure (Sender: TObject; var Key: Word; Shift: TShiftState) of object;
property OnKeyDown: TKeyEvent;
위를 살펴보시면 key라는 변수와 Shift라는 변수가 보이시죠?
여기서 Shift라는 변수에는 Shift, Alt, Ctrl등의 키가 눌렸는지를
알려주는 [ssShift], [ssAlt], [ssCtrl]등이 들어가게 되죠...
그리고 key에는 이를 제외한 키값이 들어가게 됩니다.
그러니까 Shift-1을 누르는 경우
Key에는 '1'의 키값이...
Shift에는 [ssShift]가 들어가게 되는 것이죠...
그럼...도움 되시길...
|