Copier un texte dans une appli. externe(sendmessage)

Résolu
element1488 Messages postés 7 Date d'inscription vendredi 13 février 2004 Statut Membre Dernière intervention 18 décembre 2005 - 11 déc. 2005 à 20:28
element1488 Messages postés 7 Date d'inscription vendredi 13 février 2004 Statut Membre Dernière intervention 18 décembre 2005 - 18 déc. 2005 à 19:54
Bonjour à tous,

Le but est de faire apparaitre une liste de choix par un hotkey.
Lorsque l'utilisateur click la liste, le choix sélectionné est copié dans l'application précédente et la liste disparait.
Ça focntionne sauf que le texte est copié dans le titre de la fenétre précédente au lieu du contrôle actif dans cette fenètre. Par exemple à partir de bloc-notes le texte est copié dans le titre au lieu de la zone de texte. Voici le code que j'utilise:

Dim TextToCopy As String
Dim retval As Long

TextToCopy = "Selection"
ShowWindow hWnd_Target, 1
retval = SendMessage(hWnd_Target, WM_SETTEXT, 0, ByVal TextToCopy)
Me.Hide

Merci

2 réponses

element1488 Messages postés 7 Date d'inscription vendredi 13 février 2004 Statut Membre Dernière intervention 18 décembre 2005
18 déc. 2005 à 19:54
Merci ShareVB pour ton aide,

J'ai trouvé une autre solution à partir d'un publié par Renfield que j'ai modifié pour convenir. je vais le publié bientôt au cas ou ça pourrait servir
3
ShareVB Messages postés 2676 Date d'inscription vendredi 28 juin 2002 Statut Membre Dernière intervention 13 janvier 2016 26
15 déc. 2005 à 20:29
salut,



avec FindWindow et FindWindowEx, il faut que tu trouves le handle du
controle (sous-fenêtre) lui-même et non de la fenêtre (comme tu le
fais)...

sinon, il faut voir avec Sendkeys mais c'est moins propre...

ShareVB
0
Rejoignez-nous