Discussion :

[franckcl]

Delphi Tokyo 10.2 / Windows 10

Bonjour,

Dans Windows 10, j'ai associé une extension de fichier à mon application (lors de l'installation avec INNO SETUP).
La première fois que je clique dessus, mon application est lancée et je peux récupérer le nom du fichier dans la variable ParamStr(1).
En revanche, si mon application est déjà lancée, une nouvelle instance est créée.
Comment récupérer cet événement dans l'application sans qu'une nouvelle instance soit ouverte ?

Merci.

Franck

[Charly910]

Bonjour,
je ne sais pas si cela te convient, mais tu peux bloquer une seconde instance de ton programme avec les Mutex

Regarde la FAQ ici

A+
Charly

[ShaiLeTroll]

En allant plus loin sur le Mutex, tu peux aussi ajouter un EVENT, et faire que la seconde instance envoie des données à la première, WM_COPYDATA par exemple, ATOM, FileMapping... tout ce qui peut fournir une chaîne assez courte représentant la ligne de commande.

[Roland Chastain]

Intéressante question. Je sais que Notepad++ fait cela, mais ce n'est pas du Pascal.

En complément à la réponse de ShaiLeTroll, je signale ce tutoriel :

Envoyer des chaînes par PostMessage

Il y a une unité attachée à l'article.

[gbegreg]

Intéressante question. Je sais que Notepad++ fait cela, mais ce n'est pas du Pascal.

Mon éditeur de texte le fait aussi : GBEPad est réalisé avec Delphi mais pas en open source car j'utilise les composants russes EControl Syntax Editor modifiés http://www.econtrol.ru/syntedit.html). La suite de composants en contient un d'ailleurs qui permet de rendre mono instance l'application (avec passage de paramètres de la seconde instance vers la première).

Il me semble que la JCL ou la JVCL en propose un également mais je ne retrouve pas l'information...

[gbegreg]

J'ai retrouvé le composant (gratuit) qui fait cela avec la JVCL : il s'agit du TJvAppInstances.

[franckcl]

Merci à tous, c'est maintenant résolu.

J'utilisais déjà les mutex pour éviter de lancer plusieurs fois l'application.
Je ne faisais qu'afficher un message lorsque l'utilisateur tentait de lancer l'appli plusieurs fois.
Pour répondre à mon problème, ce que j'ai fait c'est que j'appelle la fonction FindWindow en passant comme paramètre la classe de la fenetre principale.
je peux donc renvoyer un message vers l'application qui est déjà ouverte avec SendMessage.

Merci