Echange de textes entre 2 applications

Le composant DiConverse permet d'envoyer un texte à une autre application
*************************************************************************
Le principe de fonctionnement
Consiste à marquer la fenêtre principale de l'application réceptrice avec une marque personnalisée (utilisation de SetProp).
Cette fenêtre est sous-classée de façon à intercepter le message WM_COPYDATA.
Quand elle reçoit ce message, on déduit de la structure COPYDATASTRUCT
Le texte reçu et le composant lève un évènement DataArrival.

Du coté de l'application émetteur, c'est encore plus simple.
On fait une énumération(EnumWindows) des fenêtres pour retrouver la fenêtre ayant la marque (GetProp) de façon à lui envoyer le message WM_COPYDATA.
*************************************************************************
Utilisation du composant
Inventez un nom unique , ce nom unique sera utilisé dans les deux applications
exemple : MonTag = "DELBEKE_TEST_1"
Dans la fenêtre réceptrice :
Placez le composant sur la feuille principale de votre application
Dans l'événement Form_Load, placez ce code
Converse1.HookWindow Me.hWnd, MonTag
Dans l'événement Converse1_DataArrival
Faites le traitement la donnée reçue en paramètre.


Dans la fenêtre émettrice :
Dans la procédure qui vous convient, utilisez
Converse1.SendData LeTexteAEnvoyer, MonTag
*************************************************************************
Exemples fournis avec le composant
Envoi d'un texte a une autre application
prjReceteur.exe 'le récepteur
prjEmetteur.exe 'l'émetteur
Lancer une application , si une occurrence existe déjà, envoyer la chaîne de commande a cette instance au lieu de démarrer une nouvelle instance.
prjLanceChaineCommande.exe 'le lanceur de prjChaineCommande.exe
prjChaineCommande.exe 'l'appli lancée