כיצד להשתמש באירוע KeyPress Lieu של תווית מפתח


סיכום


מפתחים רבים משתמשים תווית מפתח ON כדי להקצות תוכניות או שגרות מתוך תוכניות שהן שיש לבצע בעת הקשה על מקש מסוים (בדרך כלל מקש פונקציה). עם זאת, אם המשימה על תווית מפתח כדי להיות ספציפיות פקד בתוך טופס, חלופה טובה יותר יהיה להשתמש האירוע KeyPress של פקד זה.

מידע נוסף


האירוע KeyPress זמין עבור פקדי הטופס הבא:
תיבת סימון, תיבה משולבת, CommandButton, תיבת עריכת, בטופס, תיבת רשימה, OptionButton, תיבת הטווח, תיבת טקסט
הוא עשוי להשתמש באירוע זה כדי לבדוק אם הדפוס של מפתח ספציפי. בעת שימוש באירוע KeyPress לביצוע פעולה המבוססת על מקש פונקציה, יש להשתמש בערך של מקש פונקציה כפי שמוצג בטבלה הבאה:


Key Alone Shift Ctrl Alt
------------------------------------
F1 28 84 94 104
F2 -1 85 95 105
F3 -2 86 96 106
F4 -3 87 97 107
F5 -4 88 98 108
F6 -5 89 99 109
F7 -6 90 100 110
F8 -7 91 101 111
F9 -8 92 102 112
F10 -9 93 103 113
F11 133 135 137 139
F12 134 136 138 140
לקבלת מידע נוסף אודות ערכי מפתח, עיין בפונקציה INKEY() בקובץ Visual FoxPro לסייע.

דוגמה שלב אחר שלב

השלבים הבאים מראים כיצד להשתמש האירוע KeyPress.


  1. יצירת טופס וכדי למקם תיבת טקסט עליו.
  2. במאפיין מקור פקד של תיבת הטקסט, סוג mykey (או כל משתנה אחרות אשר ייתכן שתעדיף).
  3. מקם את הקוד הבא בתוך האירוע KeyPress של תיבת הטקסט:
       LPARAMETERS nKeyCode, nShiftAltCtrl
    *: The previous line of code is already contained in the KeyPress event
    *: by default.
    DO CASE

    CASE nKeyCode = 28
    WAIT WINDOW "The F1 Key has been pressed" NOWAIT
    mykey = "F1 Key"
    ThisForm.Refresh

    CASE nKeyCode = -4
    WAIT WINDOW "The F5 Key has been pressed" NOWAIT
    mykey = "F5 Key"
    ThisForm.Refresh

    ENDCASE
  4. מקם את הקוד הבא בתוך האירוע Load של הטופס:
       CLEAR MACROS
    SET HELP OFF
    *: This will disable FoxPro's default function key assignments.
  5. מקם את הקוד הבא באירוע ההשמדה של הטופס:
       RESTORE MACROS
    SET HELP ON
    *: This will restore FoxPro's default function key assignments.
  6. מיקום לחצן פקודה בטופס, ולמקם את הקוד הבא באירוע הלחיצה שלו:
       ThisForm.Release
  7. שמור והפעל את הטופס. אם הקשה על מקש F1 או F5, אמור להופיע הודעות להמתין חלון המתאים ולאחר יש לעדכן את תיבת הטקסט.