Discussion :

[Franck26]

Bonjour,
Y a t'il une solution pour connaitre sur quel objet a été déclenché l'événement OnClick d'un menu popup.
Dans le PopupOnClick(TObject *Sender), le sender correspond au TPopup ou à l'objet sur lequel j'ai cliqué ?

Dans mon cas le PopupOnClick se déclenche sur un TImage, je voulais récupérer la taille de cette image de la façon suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
void __fastcall TFrm_Main::PpM_ProcNG2Click(TObject *Sender)
{
        TImage *Image = (TImage *)Sender;
        x = Image->Width;
}

Mais ça n' a pas l'air de fonctionner.

Merci de vos réponses et suggestions.

A+.

[Crayon]

Salut Franck26,

Premièrement, met ton code dans les balises [CODE].

Deuxièment, va voir le post suivant: http://www.developpez.net/forums/sho...d.php?t=228386

[Sunchaser]

Bonsoir,

On peut imaginer :
. Un fonction commune pour les OnMouseMove des TImage :
- dans le .h:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
__published:	// Composants gérés par l'EDI
void __fastcall GenImageMouseMove(TObject *Sender, TShiftState Shift, int X, int Y);

private:	// Déclarations de l'utilisateur
TImage *pIm;

- dans le .cpp:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
void __fastcall TForm2::GenImageMouseMove(TObject *Sender, TShiftState Shift, int X, int Y)
{
TPoint ppoint;
ppoint.x = X;
ppoint.y = Y;
if ( PtInRect(&rect, ppoint)!= 0 )
{
	this->pIm = (TImage*)Sender;
}
}

Dans l'inspecteur d'object, tous les évènements OnMouseMove des TImages doivent désigner GenImageMouseMove.
Dans le OnClick d'un des Items du PopupMenu, on peut écrire :
(ici l'item s'appelle 'Essai')

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
void __fastcall TForm2::Essai1Click(TObject *Sender)
{
ShowMessage(this->pIm->Name);
}

Et, a priori, cela fonctionne ...

En espérant t'aider,
@ +

[Franck26]

Merci Crayon pour l'indication des balises, c'est vrai que c'est plus propre.
Sinon, je suis aller sur la discussion que tu m'as indiqué, mais je ne n'ai pas trouvé de solution pour mon cas.

Je cherche a obtenir un pointeur sur l'image sur laquelle j'ai cliqué pour déclencher mon popup.

Sunchaser, d'aprés ce que je comprend, tu me proposes de mémoriser le pointeur sur mon image quand je passe dessus avec la souris.
Donc je suppose que c'est parce que dans le code suivant, qui est déclenché par OnClick de mon Popup, le sender n'est pas un pointeur sur l'objet sur lequel j'ai cliqué, c'est ça ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
void __fastcall TFrm_Main::PpM_ProcNG2Click(TObject *Sender)
{
        TImage *Image = (TImage *)Sender;
        x = Image->Width;
}

Si c'est le cas, je vais utiliser ta solution. En revanche je n'ai pas compris l'utilité du code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
if ( PtInRect(&rect, ppoint)!= 0 )
{
	this->pIm = (TImage*)Sender;
}

C'est pour vérifier si la souris est bien sur l'image je suppose, mais que représente rect ?

Merci a tous les 2.
A+.

[Sunchaser]

Arrfff ....ou ai-je la tête moi ?



On peut écrire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
if ( PtInRect(((TImage*)Sender)->Canvas->ClipRect, ppoint)!= 0 )

a la place ...

[Franck26]

Ok, merci.
Ca fonctionne, tout est résolu.
A+.