Fermer un menu winpopup dans le systray?

Question

Comment fermer un menu clic droit?
J'ai une appli en systray avec menu sur clic droit et si je ne clique pas sur un élément du menu celui ne disparait pas de l'écran...
(popup menu pour le faire apparaitre, mais pour le faire disparaitre?)

gmni · Answer

J'ai moi aussi cherché longtemps et trouvé sur un forum
americain

Declare :

Private Declare Function SetForegroundWindow Lib "user32" (ByVal hWnd As Long) As Long

et sur l'action du bouton :
SetForegroundWindow Me.hWnd

cela devrait etre utile a tous les systemes systray que j'ai vu sur ce site...
Aplus
gmni

loskiller62 · Answer

Vraiment sympa ta réponse. Je regarde ça dès ce soir ! Par contre je ne vois pas bien sur quel évènement tu met l'action... Le problème c'est que si tu clique à côté du menu, l'appli perd la main et plus aucun évènement n'intervient: donc pas moyen de fermer le menu.
Sinon encore merci !

gmni · Answer

Voici un exemple sur le Form_MouseMove qui declanche le popup dans 
le systray :
'
Static rec As Boolean, msg As Long
msg = x / Screen.TwipsPerPixelX
If rec = False Then
    rec = True
    Select Case msg
        Case DOUBLE_CLICK_GAUCHE:
            'actionbtngauche
        Case BOUTON_DROIT_LEVE:
        SetForegroundWindow Me.hwnd  'ici avant le popup
        PopupMenu menu, , , , open
    End Select
    rec = False
End If
'
N'oublie pas de declarer avant :
'
Private Declare Function SetForegroundWindow Lib "user32" (ByVal hWnd As Long) As Long
'
Voila, a+ G

loskiller62 · Answer

Toi il faudrait que je t'embrasse ! merci ! (à tout hasard tu voudrais pas relever le défi de m'aider à trouver un anti-cheat pour mon projet? (tu as l'air d'en connaitre pas top mal) C'est pour des durs de durs expérimentés (niveau 3 sûr)! loskiller@wanadoo.fr si ça t'intéresse)

gilardh · Answer

Merci beaucoup pour cette astuce.

Regards

gilardh

cs_Arkalis · Answer

Grand merci &#224; gmni pour sa solution, vraiment tr&#232;s tr&#232;s simple, j'appr&#233;cie &#231;a :)

cs_Ibiza · Answer

Je m'associe &#224; vous pour les remerciments !!
Je cherchais cela depuis un certain temps ..
Ca marche parfait

B.R.A.V.O

Clad49 · Answer

je certifie que c'est du bon :p
Merci
Clad

Fermer un menu winpopup dans le systray?

8 réponses

Discussions similaires