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

clement - 29 mars 2016 à 21:24 - Dernière réponse : mauriciopt 18 Messages postés mercredi 12 juin 2013Date d'inscriptionModérateurStatut 23 mai 2017 Dernière intervention
- 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 

3 réponses

Répondre au sujet
nabil-bago 244 Messages postés mercredi 22 mai 2013Date d'inscription 25 avril 2017 Dernière intervention - 30 mars 2016 à 00:48
0
Utile
1
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 670 Messages postés jeudi 17 avril 2008Date d'inscription 10 décembre 2017 Dernière intervention - 30 mars 2016 à 08:25
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
mauriciopt 18 Messages postés mercredi 12 juin 2013Date d'inscriptionModérateurStatut 23 mai 2017 Dernière intervention - 1 avril 2016 à 18:24
0
Utile
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.