Discussion :

[Freektrax]

j'ai rajouter pour ne mettre que des chiffres de 0 a 9 mais j'arrive pas a deactiver la possiblité d'avoir le .

Code :

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

1
2
3
4
5
6
7
 
void __fastcall TForm3::EdlastipKeyPress(TObject *Sender, char &Key)
{
if ((Key < 48 || Key > 57)
	&& Key !=VK_BACK
	&& Key !=VK_DELETE)
	Key=0;

[blondelle]

Salut Freektrax:
Un lien sur Developpez:

http://chgi.developpez.com/tips1/#tips12

[kmaniche]

Bonjour,

voici une solution qui tu peux ,optimiser:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
void __fastcall TForm3::EdlastipKeyPress(TObject *Sender, char &Key)
{
if (Key =='.')
    Key=0;
 
 
if ((Key < 48 || Key > 57)
    && Key !=VK_BACK
    && Key !=VK_DELETE)
    Key=0;
}

[kmaniche]

Bonjour,
Pour information, tu peut poster la solution que tu as utilisée.

[DjmSoftware]

bonjour
la solution apportée dans la FAQ me semble être une meilleure alternative

Il faut obtenir les Flags de la zone d'édition choisie et lui rajouter le Flag ES_NUMBER. On utilise pour cela respectivement les fonctions GetWindowLong et SetWindowLong.

Code :

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

1
2
3
4
5
6
7
 
__fastcall TForm1::TForm1(TComponent* Owner) 
: TForm(Owner) 
{ 
long StylesEdit = GetWindowLong(Edit1->Handle, GWL_STYLE); 
SetWindowLong(Edit1->Handle, GWL_STYLE, StylesEdit | ES_NUMBER); 
}

Attention, la protection n'est pas totale. En effet, il est toujours possible de coller des caractères non numériques dans le TEdit...

Meilleures Voeux 2007