Ocx pour gérer le systray super facilement !!! si, si jetez un oeil vous verrez

Description

et bien c'est simple
vous paramétrez l'icone et le texte a afficher dans le systray
et puis MonIcone.Icone_ADD et hop il est mis
vous reparamétrez l'icone et le texte a afficher dans le systray
MonIcone.Icone_MODIFY et hop il est modifié
vous voulez le supprimer, rien de plus simple
MonIcone.Icone_DELETE

ok , ça c'était pour les actions mais comment récupérer un clicl droit sur l'icone du systray par exmple?
rien de plus simple , le systray est géré désormais comme un control a part entière donc pour notre exemple:

Private Sub MonIcone_Click(ByVal Button As Long)

If Button = 1 Then
PopupMenu MenuPop
End If

End Sub

pour info:
bouton gauche : Button = 0
bouton droit : Button = 1
bouton du milieu : Button = 2

pour les évenements voici la liste:
click
double click
mousedown
mouseup

voilà je pense que cela peut servir a bcp d'entre vous ;-)

n'oubliez pas la petite note ça prend 2secondes et votre avis (ok c'est un peu plus long mais c'est toujours intéressant de savoir ce que pense les autres de son code)

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.