Bonjour à tous,

petite question pour les experts...

J'ai mis dans un GroupBox (qui se situe lui même dans un PageControl) une objet tImage. Je voulais qu'un popup s'ouvre lorsqu'on clic dessus à l'endroit du ''clic''.

J'avais trouvé cela :
http://www.developpez.net/forums/viewtopic.php?t=247218

avec le code suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button, 
      TShiftState Shift, int X, int Y) 
{ 
PopupMenu1->Popup(Left + X, Top + Y); 
}
Or si j'applique ce code, les variables X et Y correspondent aux coordonnés de la souris par rapport à l'image et non du programme en générale.
Donc Left+X et Top+Y placent le popup tout en haut à gauche de l'application.

Bon j'avais trouvé une "solution"
Code : Sélectionner tout - Visualiser dans une fenêtre à part
PopupMenu1->Popup(Left+300+X, Top+200+Y);
Le hic si je déplace le tImage, modifie ma forme faudra changer les valeurs.

Quelqu'un aurait une meilleure idée ???

MERCI D'AVANCE