procedure TfmQAB.FormShortCut(var Msg: TWMKey; var Handled: Boolean);
begin
if (Msg.CharCode = 116) and (HiWord(GetKeyState(VK_CONTROL)) = 1) then
begin
......
end
end;
【參考連結】
- תפוס את מקש SHIFT במהלך בחירת פריט בתפריט? – טיפים לדלפי – CJC דלפי (טיפים מגניבים לדלפי)
- GetKeyState:GetKeyState ，פונקציה זו מאחזרת את המפתח הוירטואלי שצוין -אנציקלופדיה ידע סינית רשת
- DELPHI OnKeyDown,OnKeyPress,ההבדל ב-OnKeyUp-CSDN Blog_delphi onkeydown
- טבלת ערכי מפתח דלפי – שבט טייוואן
- כיצד לזהות לחיצה על ctrl-t בדלפי – הצפת מחסנית
- טבלת השוואת ערכי קוד מקלדת
