[ADA95] Problème de saisie de chaîne de caractères

Problème de saisie de chaîne de caractères [ADA95] - Programmation

Marsh Posté le 21-10-2001 à 12:51:53    

Voici une partie de mon programme :
 
begin
i := 1;
Put ("Entrez le nom du client " );
Put (i);
Put (" : " );
Get_Line (N(i).nom,j);
while N(i).nom /= "quit" loop
   Put ("Donnez le nombre de commandes : " );
   Get (N(i).nb_commande);
 
avec i et j en "Integer", N un tableau consitué d'un enregistrement et dans cet enregistrement, "nb_commande" qui est un entier et "nom" un sous-type "str" de "string (1..100)".
 
Mon problème est que lors de l'éxécution, le programme affiche "Entrez le nom du client 1 :" et passe directement à l'affichage de "Donnez le nombre de commandes" sans me laisser entrer le nom du client.
Est-ce que quelqu'un sait pourquoi? (on m'a parlé d'un problème de tampon mémoire mais j'ai rien trouvé...)
 
Question subsidaire : Ma méthode est-elle la bonne pour que l'entrée qu mot "quit" arrète la boucle?


---------------
Le tout c'est d'y croire! DaBZHWDT site : www.setibzh.com
Reply

Marsh Posté le 21-10-2001 à 12:51:53   

Reply

Marsh Posté le 21-10-2001 à 15:42:51    

up plize


---------------
Le tout c'est d'y croire! DaBZHWDT site : www.setibzh.com
Reply

Marsh Posté le 21-10-2001 à 22:17:31    

pour la sortie de la boucle utilises plutot une levée d'erreur
et pense a end of loop
bon courage :bounce:

Reply

Sujets relatifs:

Leave a Replay

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