Simulation de touche dans un richedit

bonjour,
il faudrait que je fasse reagir un memo caché comme un memo qui est affiché,
c'est a dire que lorsque l'on saisie des carac dans MemoA, on envoie le meme
message au memoB de facon a obtenir une image du A

jai deja ca :

Code:

---

1 2 3 4 5 6 7 8 9 10

procedure TForm1.MemoAPress(Sender: TObject; var Key: Char); begin MemoB.SelStart := PN_Memo_Visualisation.SelStart; MemoB.SelLength := PN_Memo_Visualisation.SelLength;   // envoyer le message a B   end;

---

comment lui simuler une frappe de touche de facon a reproduire le meme comportement
que MemoA

(Attention, ca ne m'interresse pas de recopier B dans A : le contenu differe, je veux juste obtenir les memes
changements aux memes places)

Thx

salut


en utilisant tous simplement sendmessage

Code:

---

SendMessage(Memob.Handle, WM_CHAR, Word(Key), 0);

---

@+ Phil

Cool, ca c'est bon,

par contre, j'ai mis ce code sur l'evenement OnKeyPress

mais ce dernier ne recoit pas la touche SUPPR,

comment faire pour recevoir suppr dans MemoA et l'envoyer dans MemoB ?

salut

essai peut etre un autres message dans ce cas
dans une autre methode
onkeydown plutot on keypress
si tu regarde la designation de procedure KeyPress(var Key: Char)
tu t'appercois qu'il ne passe qu'un caractere et pas la valeur de la touche

voila le code a mettre dans le on OnKEYDOWN

Code:

---

SendMessage(Memob.Handle, WM_KEYDOWN, Key, 0);

---

@+ Phil

cool !
c'est bon !