Deux fiches solidaires en position

Bonjour !!

Voilà mon souci. J'utilise deux fiches dans mon programme. L'une est une fenetre principale qui est affichée tout le temps, l'autre une fenetre affichée occasionnellement. Lorsque la deuxième fenetre est affichée, j'aimerais qu'elle soit placée directement collée à la fenetre principale. Jusque là tout va bien, il me suffit de récupérer la position de la première et de paramétrer la position de la seconde en fonction de la principale.... bref.

Mon problème vient du fait que j'aimerais qu'en déplaçant la fenetre principale, la fenetre secondaire suive le mouvement. J'ai regardé s'il existait pas un event du style Drag de la première, mais j'ai pas trouvé ce que je cherchais.
Des idées peut être ??
Merci !

Salut androz
Peut etre quelque chose comme ceci

Code:

---

1 2 3 4 5 6 7

void __fastcall TForm1::FormActivate(TObject *Sender) { Form2->Show(); Form2->Left = Form1->Left + Form1->Width; Form2->Top = Form1->Top; }

---

Salut !

Dans la classe de TForm1 déclarer :

Code:

---

1 2 3 4 5 6 7

protected: void __fastcall WMMoving(TMessage &Message);   BEGIN_MESSAGE_MAP MESSAGE_HANDLER(WM_MOVING, TMessage, WMMoving) END_MESSAGE_MAP(TForm)

---

La méthode :

Code:

---

1 2 3 4 5 6 7

void __fastcall TForm1::WMMoving(TMessage &Message) { RECT *R = (RECT*)Message.LParam; Form2->Left = R->right; Form2->Top = R->top; }

---

Chez moi ça fonctionne donc...

A plus !