Aidez moi a trouver le code delphi n'autorisant sur les reels [Résolu]

- - Dernière réponse : mauriciopt
Messages postés
18
Date d'inscription
mercredi 12 juin 2013
Statut
Modérateur
Dernière intervention
23 mai 2017
- 1 avril 2016 à 18:24
Bonjour,
svp je cherche un code source en delphi n'autorisant que la saisie des nombres reels dans un edit.svp aidez moi
Afficher la suite 

Votre réponse

2 réponses

Messages postés
245
Date d'inscription
mercredi 22 mai 2013
Dernière intervention
14 août 2018
0
Merci
Salut,
coche la propriété de l'Edit ( NumberOnly) elle autorise que les nombres (entiers ou réels )

j'utilise Delphi XE8, je pense que sa existe que dans les versions Delphi XE
dubois77
Messages postés
692
Date d'inscription
jeudi 17 avril 2008
Dernière intervention
14 septembre 2018
-
Salut
Si çà n'existe pas utilise :
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (Key in ['0'..'9', DecimalSeparator, Chr(VK_BACK), Chr(VK_DELETE)]) then
Key := #0;
if Key = DecimalSeparator then
if Pos(DecimalSeparator, Edit1.Text) <> 0 then
Key := #0;
end;
Commenter la réponse de nabil-bago
Messages postés
18
Date d'inscription
mercredi 12 juin 2013
Statut
Modérateur
Dernière intervention
23 mai 2017
0
Merci
Salut,

composant TcyEditFloat ici:
https://sourceforge.net/projects/tcycomponents/

a+
Commenter la réponse de mauriciopt

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.