Clique gauche sur une icone systray

therafou Messages postés 46 Date d'inscription mercredi 26 février 2003 Statut Membre Dernière intervention 10 juin 2007 - 31 mai 2007 à 14:13
ShareVB Messages postés 2676 Date d'inscription vendredi 28 juin 2002 Statut Membre Dernière intervention 13 janvier 2016 - 23 juil. 2007 à 23:16
Bonjour,

Voilà je viens de mettre en place une icone dans le systray de ma bar windows. le tout avec un menu pour avoir les config et quitter le programme. Ce menu s'affiche quand l'on fait un clique droit sur l'icone. Mais j'aimerai attribuer une action au clique gauche du genre je fais apparaitre ou charger une Form d'information. Mais je ne connais pas quel paramètre ou fonction, il faut mettre en place pour créer cette évenement.
Pour charger la form, il faut mettre Form_info.Show()
Mais j'ignore le reste

Voilà la partie du code qui va générer l'icone dans le systray

   Public Shared icone As New Windows.Forms.NotifyIcon
    Public Shared Sub Main()

        'Créer le ContextMenu
        Dim ContextMenuStat As New ContextMenuStrip

        'Créer et ajouter des items au menu
        Dim item_config As New ToolStripMenuItem
        Dim item_close As New ToolStripMenuItem

        'configuration du premier item
        item_config.Name = "item_config"
        item_config.Text = "Configuration"
        ContextMenuStat.Items.Add(item_config)
        AddHandler item_config.Click, AddressOf item_config_Click

        'configuration du second item
        item_close.Name = "item_close"
        item_close.Text = "Quitter"
        ContextMenuStat.Items.Add(item_close)
        AddHandler item_close.Click, AddressOf item_close_Click

        'création et configuration du notifyicon
        With icone
            .Icon = My.Resources.Control_Panel3
            .Text = "Widget - FRserveur" & vbCrLf & "Version Beta 1.0"
            .ContextMenuStrip = ContextMenuStat
            .Visible = True
        End With
       ' lancement de l'application
        Application.Run()
       ... suite de l'application

Si vous avez idée, merci d'avance.

1 réponse

ShareVB Messages postés 2676 Date d'inscription vendredi 28 juin 2002 Statut Membre Dernière intervention 13 janvier 2016 25
23 juil. 2007 à 23:16
salut,

les évènements MouseDown, MouseUp et MouseClick du notifyicon te permettent de savoir lorsque un bouton (e.button dans les events) de la souris est appuyée, relaché ou cliqué...

ShareVB
0