Discussion :

[Snaval]

1ère question:

Je suis un nouvel utilisateur de Ada; je dispose d'un compilateur GNAT et d'un compilateur graphique Adagide, version Mars 2008.
J'ai fait quelques programmes qui marchent à l'exécution, après les étapes classiques : Compiling, Building; à ce stade un message dans le panneau de message indique: essai.exe missing (si le nom de programme est essai.adb).
Ce message apparaît sur tous mes programmes.
A l'exécution le programme marche (tous les programmes); mais quand j'exécute le programme sur appel de essai.exe il n'y a rien, l'écran disparait furtivement et je suis obligé de revenir à l'ouverture du programme source et d'effectuer tout: Compile, Build et Execute.
Que faut-t-il faire? Y a-t-il un réglage de Settings de Adagide?

2ème question:

Je réside à Antananarivo, Madagascar. Y a-t-il un programmeur en Ada qui réside en ville ou à Madagascar ?
Pour échanger nos coordonnées, envoyez-moi un MP.

Salutations

[Petrucci]

Bonjour,
Lorsque tu exécutes ton programme sous Adagide, un message te demandant de cliquer sur "ok" apparaîtra lorsque ton programme sera finit. C'est un service offert par ton compilateur (adagide).

Lorsque tu exécutera manuellement ton programme, il fera son travail mais ne te demandera pas de cliquer sur un quelconque bouton avant de se fermer...

Si tu veux voir ce qu'il se passe quand même, pense à mettre des instructions d'attente à la fin de ton programme par exemple, ou demande d'appuyer sur une touche pour quitter, etc ..

En espérant t'avoir aidé

[Snaval]

Merci pour ta suggestion : je n’y avais pas pensé plus tôt.
Après avoir ajouté un petit programme de boucle d’attente à la fin du programme proprement dit et avant le end final, le programme s’exécute et s’arrête avant l’ordre de sortie donné par le programmeur.
Voici un exemple de boucle d’attente qui pourrait intéresser les programmeurs débutants :
. . . . . . . . . . . . . . .

Code :

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

1
2
3
4
5
6
7
8
-- La boucle suivante sert à visualiser le résultat
-- en exécutant le programme exe
     nombre_sortie := 10;		-- Nombre quelconque, juste pour amorcer
     while nombre_sortie /= 0 loop
         put_line("Tapez le nombre 0 pour sortir");
         get(nombre_sortie);
     end loop;
end nom_de votre_procedure;

Quand le programme s’arrête avant la sortie, tous les résultats cherchés figurent d’jà à l’écran : le programmeur peut le visionner, le copier et l’imprimer sur papier à l’extérieur.