우선 키값을 알고싶을 때는 OnkeyPress Event에 다음구절을
Edit5.Text := IntToStr(Ord(Key));
Key := #0; {used to trap key strokes}
질문과 같이 ALT 키나 Ctrl키를 알고싶을때는 OnkeyDown Event에
다음구절을 첨가 해주시면 어떨가용..
if (Shift = ([ssShift])) then 어쩌고 저쩌고
if (Shift = ([ssShift, ssAlt])) then 어쩌고 저쩌고
if (Shift = ([ssShift, ssCtrl])) then 어쩌고 저쩌고
if (Shift = ([ssShift, ssAlt, ssCtrl])) then 어쩌고 저쩌고
이상 부산에서 야후였습니다..
그럼 ~.*
|