Discussion :

[Tomimie]

Bonjour à tous!

Je voudrais tester si une chaine est un entier !
L'utilisateur entre un texte dans un Edit, et je vourais savoir si c'est bien un entier !
J'ai voulu utiliser les MaskEdit mais si l'utilisateur rentre 2 caractères alors que le MaskEdit en prévoit 4, par exemple, ça plante !
Je ne sais pas si une fonction Delphi exicte pour cela, et sinon comment faire ???

Merci beaucoup !

[sjrd]

TryStrToInt ?

[hardouz]

Explication :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
For i:=1 to Lenght(edit1.text) begin
  If StrToInt(Edit1.text[i]) <> [0..9] then
  Begin 
    {C'est pas un entier}
    Showmessage('Ce n''est pas un entier');
  end;
end;