Popup sur un clic gauche

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:

---

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:

---

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 :D

Essaie de remplacer les 300 et 200 par le TImage->Left et TImage->Top :wink:
Comme ca si tu déplace ton TImage, tu reste "dedans"

bonjour avec cette formule tu devrais trouver ton popup Menu centré par rapport a l'endroit ou tu a clické la souris

Code:

---

1 2 3

//pm1= PopUpMenu pm1->Popup(img1->Left+X+img1->Height/2,img1->Top+Y+img1->Width/2);

---

Cordialement

exacte les gars. Mais bon comme j'ai l'image dans un page controle puis groupbox il m'a fallu rajouter ces valeurs de positions et cela fonction


MERCI LES GARS DE VOTRE AIDE, ce fut clair et rapide.

A une prochaine :wink: