Bonjour à tous
Je suis en train de m'arracher les cheveux et je ne comprend pas pourquoi cela ne fonctionne pas.
J'ai définit ma méthode OnKeyDown pour détecter les appuis de touches
Je voudrais déclencher quelque chose lorsque l'utilisateur appuie sur Espace
J'ai donc fait ceci
Lorsque j'appuie sur espace, j'ai autre touche qui s'affiche alors que pour entrée pas de problème.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25 // Méthode déclanclée lorsque l'on presse une touche du Clavier void __fastcall TPrincipaleForm::OnKeyDown(TObject *Sender, WORD &Key, System::WideChar &KeyChar, TShiftState Shift) { ShowMessage("Touche " + String(Key)); ShowMessage("TexteTouche " + String(KeyChar)); // Si la touche pressée est Espace if(Key == vkSpace) { ShowMessage("Espace est pressé"); } else { if(Key == vkReturn) { ShowMessage("Entrée est pressé"); } else { ShowMessage("Autre touche"); } } }
Je ne comprend pas d'ou peut venir le soucis
Je développe sous RAD Studio XE7 en firemonkey
Merci d'avance pour votre aide
Partager