Accueil > Manip’s > Delphi > Atelier Delphi pour les Nuls > Exercices > Addition > Comment Controler la saisie d’un nombre avec MaskEdit ?
Comment Controler la saisie d’un nombre avec MaskEdit ?
samedi 19 avril 2008, par
Si nous reprenons le programme de l’addition de 2 champs Textes :
Si l’utilisateur saisit par erreur une lettre au lieu d’un chiffre
La conversion StrToInt échoue et le programme s’arrête.
Delphi a trouvé un moyen simple de contrôler la saisie correcte des valeurs d’un champ :
* MASKEDIT
*Remplaçons les 2 champs EDIT par 2 champs MaskEdit
*-ONGLET =>
Supplément
Le Masque de saisie se paramètre par la propriété EditMask
* EditMask = 99 mm ;0
99 = Saisir un Ou 2 chiffres
mm = Unité proposée = millimètre
;0 = Zéro signifie que le texte résultant (MaskEdit.text) prend juste en charge les Chiffres et pas l’unité
Le code devient
nombre_1 := strtoint(form1.MaskEdit1.text);
nombre_2 := strtoint(form1.MaskEdit2.Text);
Somme := Nombre_1 + Nombre_2;