Bonjour à toutes et à tous,

J'utilise un TPopupMenu sur ma fiche, mais je ne veux pas qu'il s'affiche sur mon composant TImage.

Pour ce faire, dans l'évenement onmouseup de mon Timage, je fais :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
If (Button = mbright) then pm1.AutoPopup := false ;
et sur l'évenement onmouseup de mon TForm, je fais :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
If (Button = mbright) then pm1.AutoPopup := true ;
Cela fonctionne sauf que il faut 2 clicks droit sur ma fiche pour voir mon menu.

Même si j'ai le focus de ma fiche !

Est ce un comportement normal et y a t'il un moyen de limiter à un seul click l'affichage de mon menu après avoir essayer sur mon TImage.

Merci d'avance,

@+,

Cincap