Bloquer un executable

Bonjour à tous,

Voilà, dans mon application je dois lancer un executable réaliser en Fortran(jusque là pas de problème :D ).
Mais cette executable a été conçu pour afficher des résultats, et j'aimerais donc attendre que l'utilisateur appuie sur une touche pour fermer la fenêtre de l'executable fortran.

J'ai essayé un thread et la méthode :

Code:

---

1 2	CreateProcess(...) WaitFor( ProcessInfo.hProcess )

---

Mais ça me permet uniquement de savoir que l'executable est fini...

Si quelqu'un a une idée...

Merci d'avance.

1. est-ce que tu ne pourrai pas modifier le programme fortran pour qu'il demande à l'utilisateur d'appuyer sur une touche avant de quitter ?

2. sinon tu peux créer à la volée un fichier bat go.bat qui contient deux lignes :

Citation:

---

prog_fortran.exe
@pause

---

et au lieu de lancer ton programme tu lances go.bat, puis quand il est terminé tu l'effaces

Bonjour,

Si je comprends tu lance ton process et tu attends en interrogeant celui-ci via

Code:

---

1 2	GetExitCodeProcess(ProcessInfo.hProcess, lpExitCode)

---

pour savoir si il est terminé. Mais comme celui-ci ne se termine pas vraiment sans action de l'utilisateur sur le dit process tu souhaiterait pouvoir le fermer.

As-tu essayé ?

Code:

---

1 2	DestroyWindow(ProcessInfo.hProcess);

---

a+

Tout d'abord merci pour vos réponse,

Je crois que je me suis mal expliqué Yurck...En fait j'ai pas un problème pour fermer l'executable, mais plutot pour garder son affichage.

Citation:

---

1. est-ce que tu ne pourrai pas modifier le programme fortran pour qu'il demande à l'utilisateur d'appuyer sur une touche avant de quitter ?

---

Non je peux pas modifier le Fortran, parcque c'est un logiciel développé en interne et il veulent pas que je le modifie...

Citation:

---

2. sinon tu peux créer à la volée un fichier bat go.bat qui contient deux lignes :

---

Cette idée me parait bonne, mais j'ai du mal a voir ce que je doit faire...
N'aurait-tu pas un lien ou un exemple de manipualtion de fichier 'bat' denokan?

Merci encore.

@+.

il suffit de créer le fichier bat dans le dossier de ton application fortran, et à l'intérieur tu écris :
le nom de ton programme fortran sur la première ligne
la commande dos pause qui demande à l'utilisateur d'appuyer sur une touche pour continuer le déroulement du fichier bat

ainsi, quand tu lances ce fichier bat, tout se déroule comme si tu tapais son contenu directement au clavier. tu verra donc apparaître le nom de ton programme fortran, ses résultats, puis la commande pause, puis la ligne 'veuillez appuyer sur une touche....'

pour terminer, dans un soucis de clarté, tu peux (dans ton fichier bat) précéder la commande pause du signe @ afin de ne faire apparaître à l'écran final que le résultat de la commande, et non pas son appel.

un exemple de fichier go.bat :

Citation:

---

dir
@pause

---

Yes,

Maintenant que j'ai compris crois-je, je pense que la solution du .bat est tout aussi mauvaise.
Si ton exe fortran se referme quand il a fini son affichage ce n'est pas le pause dans le .Bat qui l'en empêchera.
Donc soit tu t'impose et demande aux grands garçons ou filles en interne de modifier leur programme pour donner accès aux informations qu'ils affichent soit tu t'acharnes à essayer de les récupérer avant qu'elles ne s'évanouissent.

Alors si tu ne peux pas t'imposer (Oh les méchants), tu dois contourner le problème.
Par exemple en cherchant à copier l'image :faq:de cette appli dans ta boucle d'attente et conserver l'avant dernière qui "devrait" être la meilleure.

a+

Correction

En relisant denokan je me dis qu'il faut essayer le .Bat car après tout si le programme Fortran affiche les infos sur le prompt DOS cela devrait pouvoir le faire.

a+

Ok Yurck,

Je vais m'imposer pour les forcer à modifier leur fortran...Et si ils refusent je démissionne!!

Tans pis pour eux, il vont perdre leur meilleur ( et unique ) stagiaire. ;)

Merci à tous, je reviendrais si ils refusent...

@+.

Autre idée : au lieu de lancer MonProg.exe, tu lances cmd /k "MonProg.exe", c'est-à-dire que tu lances la fenêtre Dos, qui lance ton programme. Ton programme se termine, mais la fenêtre Dos reste ouverte.

PS : Mais il ne faut pas que ça t'empêche de démissionnier :P

Merci rsc,

mais je crois que j'ai du mal avec le DOS...
Tu lance comment ta commande? PArcque actuellement j'essaye ça :

Code:

---

1 2 3

CreateProcess(nil, 'C:\Simalim\Meca\cmd /k"calculMarcheMR.exe"', nil,nil,True,0,nil,nil,Si,Pi);

---

Et il se passe rien...

@+.

Citation:

---

Envoyé par PadawanDuDelphi

Code:

---

1 2 3

CreateProcess(nil, 'C:\Simalim\Meca\cmd /k"calculMarcheMR.exe"', nil,nil,True,0,nil,nil,Si,Pi);

---

---

1/ Déplacer le chemin : Cmd est dans un des dossiers standard de Windows, c'est ton prog qui est dans Meca,
2/ Rajouter l'espace entre K et ",
3/ Au temps pour moi, c'est un K majuscule, la minuscule ne marche pas !

Code:

---

1 2 3

CreateProcess(nil, 'cmd /K "C:\Simalim\Meca\calculMarcheMR.exe"', nil,nil,True,0,nil,nil,Si,Pi);

---

Merci bocoup rsc!!
Ca fonctionne nickel avec ton code!

Comme ça je serait pas obliger de me battre ou de démissioner ;) .

Et merci à vous tous pour votre aide!!

@+.

A ton service !

Si c'est bon, n'oublie pas la balise :resolu: :)