Discussion :

[** Phil **]

Bonjour à tous,

Dans un TMemo je souhaite récupérer les touches frappées au clavier dans l'évènement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
void __fastcall TForm1::Memo1KeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
}

Mon soucis est de distinguer les majuscules des minuscules car je constate que dans Key j'ai toujours le code ASCII du caractère Majuscule.

De plus Shift ne concerne que ssShift, ssAlt et ssCtrl.

Comment savoir si je suis en présence d'un caractère majuscule ou minuscule ?

Merci pour votre aide.

[udinacer]

bon jour tu peut utiliser la méthode OnKeyPress de TMemo

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
void __fastcall TForm1::mmo1KeyPress(TObject *Sender, System::WideChar &Key)
{
        if (Key==UpCase(Key)) 
 
            	ShowMessage("Le caractère est en majuscule");
 
         else
 
                ShowMessage("Le caractère est en miniscule");
}

[udinacer]

Sinon dans la méthode OnkeyDown

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
void __fastcall TForm1::mmo1KeyDown(TObject *Sender, WORD &Key, TShiftState Shift)
 
{
 
	   if(((GetKeyState(20) & 1) == 1)|| Shift.ToInt()==1)
 
		Label1->Caption="Le caractère est en majuscule";
 
           else
 
	        Label1->Caption="Le caractère est en miniscule";
 
}

[** Phil **]

Merci pour cette réponse. Ça marche.

C'est effectivement plus facile dans l'évènement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
void __fastcall TForm1::Memo1KeyPress(TObject *Sender, char &Key)
{
}