Saisie d'un nombre décimal

Résolu
EddiTheHead
Messages postés
58
Date d'inscription
mercredi 16 février 2005
Statut
Membre
Dernière intervention
2 juin 2006
- 18 août 2005 à 19:58
EddiTheHead
Messages postés
58
Date d'inscription
mercredi 16 février 2005
Statut
Membre
Dernière intervention
2 juin 2006
- 19 août 2005 à 15:11
Slt,

Je cherche le moyen de forcer la saisie d'un "real" dans un MaskEdit.

Var Valeur : Real;
Begin
Valeur := StrToFloat(MaskEdit.Text); // avec comme masque : !0000,00
End.

Ce code ne fonctionne pas toujours :
1234,5 : ok
12__,4_ : devient "12 ,4" et se plante lors de la convertion du StrToFloat.

Je veux éviter les codes qui lisent n'importe quel caractère, qui convertit le String et si se n'est pas un Real on recommence la saisie.

Je m'écarte peut-être du problème en utilisant un MaskEdit. Y a peut-d'être d'autre facilité.

Si quelqu'un à une solution à mon problème ...

2 réponses

jlen100
Messages postés
1606
Date d'inscription
samedi 10 juillet 2004
Statut
Membre
Dernière intervention
25 juillet 2014
12
19 août 2005 à 08:59
salut je viens de m'appercevoir que l'adresse du lien avait un problème le code est disopnible sur ce site sous le titre:

[code.aspx?ID=32310 FILTRER LA SAISIE VALIDE D'UN NOMBRE ENTIER, FLOTTANT, SIGNÉ OU NON, DANS UN TEDIT]
3
EddiTheHead
Messages postés
58
Date d'inscription
mercredi 16 février 2005
Statut
Membre
Dernière intervention
2 juin 2006

19 août 2005 à 15:11
Slt,

Ah ben voui, 2 jours de recherche alors que la solution était devant moi.
Honte à moi et 1.000 fois pardon à Japee pour sa source.
Et merci à toi de m'avoir ouvert les yeux.
0