Test ouverture d'une applicationRésolu

Question

bonjour à tous,
je recherche une solution pour tester si une application est ouverte ou non.
je m'explque:
avec le bouton1 de mon project1, en défissant son chemin, j'aimerai savoir si mon project2 est ouvert 
en vous remerciant d'avance,
sincères salutations et bon codding.
Dugueclin

Caribensila · Accepted Answer

Bonsoir,

- Le plus simple :
  Ton Project2 modifie un fichier à son ouverture, puis à sa fermeture. Et ton Project1 vérifie l'état de  ce fichier.
- Plus compliqué :
  Lister les processus en cours (il y a plusieurs exemples sur ce site).

JulioDelphi · Answer

Le fichier témoin est la solution la plus simple mais a un inconvévient : si le project1 est mal fermé (plantage) alors le fichier témoin existera lors de la vérification.

cs_cantador · Answer

bonsoir,





je recherche une solution pour tester si une application est ouverte ou non.


peux-tu nous en dire la raison ?


cantador

cs_Delphiprog · Answer

@caribensila : la première méthode est un peu barbare et, s'il n'a pas la main sur le code de project2, ça devient mission impossible.

@cantador : tu as raison, ça sonne bizarre. Delphi est un vrai langage compilé et le terme de script serait plutôt réservé aux langages interprétés. M'enfin, ça ne me choque pas plus que ça.

May Delphi be with you !
<hr color="#008000" />Pensez à cliquer sur Réponse acceptée lorsque la réponse vous convient.

Bacterius · Answer

Tu peux essayer de supprimer l'executable ... si l'executable est en cours d'execution tu ne pourras pas le supprimer ... sinon prévois de faire une copie dans un dossier temporaire pour restaurer le fichier, si jamais il n'était pas en execution ?
Solution barbare ...

Cordialement, Bacterius !

Caribensila · Answer

Je crois que je descends d'un cran sur l'échelle des barbaries...    ;)

cs_cantador · Answer

PROCEDURE TForm1.Button1Click(Sender: TObject);
BEGIN
  SetLastError(NO_ERROR);
  CreateMutex(NIL, False, 'MonAppli');
  IF GetLastError = ERROR_ALREADY_EXISTS THEN
  BEGIN
    Showmessage('ouverte !');
  END;
END;

cantador

cs_dugueclin · Answer

bonsoir à tous,
meri de m'avoir répondu, c'est super sympa à vous 
Sincères salutations et bon codding à tous !! et meilleurs voeux 2009!!!
Dugueclin.

Test ouverture d'une application

8 réponses

Votre réponse

Discussions similaires