Leger soucis avec la fonction SendMessageRésolu

Question

Bonjour,

Je souhaiterai utiliser une application (APP2), que j'ai fait, a partir d'une application principale (APP1)
C'est a dire envoyer du texte de l'APP1 vers un Edit de l'APP2
En cherchant sur le forum j'ai trouve une solution avec : SendMessage(Handle, WM_CHAR, vKey, 0);
J'ai le handle de mon Edit de l'APP2

Je lance la fonction et tout se passe bien : mon texte est bien envoyé de mon APP1 dans le Edit de mon APP2
(Si j'envoie MESS1 de APP1 vers Edit de l'APP2, j'ai bien Edit.text:=MESS1)

Le problème, c'est que si je lance la fonction une 2eme fois et que j'envoie MESS2, je me retrouve avec Edit:=MESS1+MESS2
et ainsi de suite

Quelqu'un saurait il comment avoir dans le Edit que le MESS que j'envoie et non la somme de tout les message précédent + le nouveau MESS ?

Par avance, merci



PS : J'utilise delphi 2007, sous Windows 7

happy05 · Accepted Answer

Bonjour, 


var
HD:HWND;
mytext:string;
begin
HD:=leHandle;
mytext:='text';
SendMessage(HD,WM_SETTEXT,0,Integer(@mytext[1]));

drexl · Answer

Merci beaucoup,

Ca marche nickel !

Leger soucis avec la fonction SendMessage

2 réponses

Votre réponse

Discussions similaires