pseudoOM
Messages postés173Date d'inscriptionjeudi 3 février 2005StatutMembreDernière intervention30 janvier 2009
-
14 avril 2005 à 11:40
pseudoOM
Messages postés173Date d'inscriptionjeudi 3 février 2005StatutMembreDernière intervention30 janvier 2009
-
14 avril 2005 à 13:20
Bonjour tout le monde.
Quelqu'un pourrait-il m'aider pour les contrôle de saisie. J'aimerais contrôler si l'utilisateur entre des chiffre dans Edit. J'aimerais que si l'utilisateur entre autre chose que des chiffres cela ne s'affiche pas dans l'edit par contre si il entre des chiffres il faudrait qu'ils s'affichent dans l'edit toujours en gardant les premier entré.
Ex : a --> refusé
1 --> accepté donc dans l'edit doit être affiché : "1"
h --> refusé
4 --> accepté et dans l'edit doit être affiché : "14"
etc ...
cs_barbichette
Messages postés220Date d'inscriptionlundi 30 octobre 2000StatutMembreDernière intervention15 juillet 2013 14 avril 2005 à 11:49
salut,
dans l'évenement OnKeyPress
tu place :
if not (key in ['0'..'9']) then key:=#0;
Attention si tu veux garder la possibilité d'effacer, de copier, coller...
faire :
if not (key in ['0'..'9',#0..#31]) then key:=#0;
Enfin, si tu veux placer des chiffres à virgules valides, faire :
if (key='.') and (pos('.',edit1.Text)<>0) then key:=#0;
if not (key in ['.','0'..'9',#0..#31]) then key:=#0;
Maintenant, il me semble qu'il y a des exemples sur ce site, mais je ne remet pas la main dessus.