11.2. Dérivés TWinControl

OnKeyDown

Se produit lorsque l'utilisateur appuie sur une touche et le contrôle a le focus. Cet événement répond à toutes les touches, une touche alphanumérique, y compris les touches de fonction en combinaison avec la touche Shift et Alt touches de contrôle (Ctrl) et les boutons de la souris enfoncé.

 __fastcall typedef void (* __closure TKeyEvent) (System:: TObject * Sender, Word & Key, Classes:: TShiftState Shift);
__property TKeyEvent OnKeyDown = {read = FOnKeyDown, écrire = FOnKeyDown}; 

Le Shift offre paramètre variable indique que la clé de contrôle (Maj, Alt, Ctrl) est combiné avec la touche enfoncée (valeur de clé.)

Le code annule la suite d'un travail d'impression si l'utilisateur appuie sur Echap Notez que vous devez Septembre KeyPreview sur True pour veiller à ce que OnKeyDown gestionnaire d'événements de Form1 est la rue.

 void __fastcall TForm1:: FormKeyDown (TObject * Sender, WORD & Key, TShiftState Shift)

{
if (Key == VK_ESCAPE & & Printer () -> Impression)
{
Imprimante () -> Abort ();
MessageDlg ("Impression interrompue", mtInformation, TMsgDlgButtons () <<Mboko, 0);
}
} 

OnKeyPress

Il se produit lorsque vous appuyez sur une touche alphanumérique ou les touches Tab, Retour arrière, Entrée et Echap

 __fastcall typedef void (* __closure TKeyPressEvent) (System:: TObject * Sender, char & Key);
__property TKeyPressEvent OnKeyPress = {read = FOnKeyPress, écrire = FOnKeyPress}; 

Cet événement gestionnaire affiche une boîte de dialogue message a été Spécification Quelle touche enfoncée:

 void __fastcall TForm1:: FormKeyPress (TObject * Sender, char & Key)

{
keystring char [25];
Keystring [0] = Key;
strcpy (& keystring [1], "a été pressé");
Application-> MessageBox (keystring, "Key Press", MB_OK);
} 

OnKeyUp

Sortie se produit lorsque une touche est enfoncée. Cet événement répond à toutes les touches, une touche alphanumérique, y compris les touches de fonction en combinaison avec la touche Shift et Alt touches de contrôle (Ctrl) et les boutons de la souris enfoncé.

 __fastcall typedef void (* __closure TKeyEvent) (System:: TObject * Sender, Word & Key, Classes:: TShiftState Shift);
__property TKeyEvent OnKeyUp = {read = FOnKeyUp, écrire = FOnKeyUp}; 

Le Shift offre paramètre variable indique que la clé de contrôle (Maj, Alt, Ctrl) est combiné avec la touche enfoncée (valeur de clé.)