[RESOLU][D 7] utilisation de try...except...end

utilisation de try...except...end [RESOLU][D 7] - Delphi/Pascal - Programmation

Marsh Posté le 02-11-2007 à 10:53:23    

bonjour,  
 
je cherche à vérifier, si ce que l'utilisateur rentre est bien ce dont le programme a besoin. Je m'explique, l'utilisateur doit rentrer une instruction du type "TOURNE 30". de là, j'extrait "TOURNE", et "30" dans deux variables (mouvement : string,l'autre distance :  integer).  
 
Mon probleme est le suivant, si l'utilisateur tape "TURNE 30", un message d'erreur doit s'afficher, ça jusque là je sais comment faire, par contre s'il rentre "TOURNE T30" ou "TOURNE GTE", une message d'erreur doit s'afficher. Comment faire pour dire que si distance n'est pas un entier, faire afficher un message ?
 
Merci d'avance à tous.
 
Si je vous comprenez pas tout, dites le, j'essaierai de faire plus clair !  :)
 
EDIT : merci de voir mon dernier message !


Message édité par gtaman31 le 02-11-2007 à 17:16:25
Reply

Marsh Posté le 02-11-2007 à 10:53:23   

Reply

Marsh Posté le 02-11-2007 à 14:00:12    


Salut ,  
 
Je sais pas comment tu fais ton traitement mais regarde avec TryStrToInt  pour la distance .


---------------

Reply

Marsh Posté le 02-11-2007 à 14:25:08    

voila ce que j'ai fais  
 
try
 distance:=strtoint(distance_str);
 
 except  
 write('Erreur sur la distance')
 end;
 
 
mais ça marche pas, j'ai toujours le message barbare de delphi

Reply

Marsh Posté le 02-11-2007 à 17:16:04    

Probleme résolu, on peut fermer !

Reply

Marsh Posté le 29-03-2008 à 11:34:57    

Et c'etait quoi la solution ?

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed