Tu utilises strtoint et tu interceptes l'erreur.
var
A : Integer;
begin
try
A := StrToInt('125A); // A n'est pas un chiffre
except
Type: Messages; Utilisateur: Fxg
Tu utilises strtoint et tu interceptes l'erreur.
var
A : Integer;
begin
try
A := StrToInt('125A); // A n'est pas un chiffre
except
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.