Discussion :

[stfanny31]

salut
j'ai un Edit qui dois me donner une valeur numérique
comment pui'je bloqué la saisi des touche alphabétique et permettre que la saisie des nombre

[Aka Guymelef]

Merci de chercher dans la

[sapin2]

voilou

http://delphi.developpez.com/faq/?pa...propri#numbers

[bs.box]

salut
j'ai un Edit qui dois me donner une valeur numérique
comment pui'je bloqué la saisi des touche alphabétique et permettre que la saisie des nombre

Essaye cette instruction dans l'évennement "OnKeyPress" de "TEdit":

Code :

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

1
2
3
 
  if not (Key in ['0'..'9',#8,#13])
     then Key:=#0

Bon Courage...

[stfanny31]

Mr +bsdocuments+ salut
merci bcp votre code a l'air de bien marché
esque vous pouvé me l'expliqué

[Archimède]

Si la touche pressée est différente de 0...9 et différente de la touche retour en arrière 'backspace' et enfin la touche pause mettre key à 0 donc sans effet.

[bs.box]

Comme a expliqué Archimède mais j'ajoute ceci:
pour les caractères [#8,#13];
#8 -> la touche BACKSPACE
#13 -> la touche ENTREE

dans le contraire des autres caractères non autorisés,
on doit retourné le caractère NUL qui est le #0

Attention !!
tu doit aussi faire attention si l'utilisateur copie n'importe
chaine de caractère dans le presse papier puis il là
colle dans l' EDIT que vous voulez..

Donc!! faite attention quand l'utilisateur colle ces données!!
Essaye des contrôles dans les evènnements "OnExit" ou "OnChange"

Bon Courage.....

[Archimède]

c'est: key=#$0D pour enter en hexa
excuse, c'est vrai en decimal c'est 13


salut