[VB6] Tray Icon e PopUp Menu

[S0nic]

Ciao a tutti,

ho realizzato un programma con una tray icon e relativi popup menu che funzionano
regolarmente, ho un unico problema.

il form principale sul quale creo la Tray Icon è diviso in due da un oggetto Line1
che appunto divide orizzontalmente la Form.

Succede che ogni volta che passo con il mouse accando alla Line1 si apre il Menu PopUp associato alla Tray Icon e non ne capisco il motivo

sapreste darmi qualche suggerimento ?


il codice che uso per aprire il popup è :

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)

Dim Result As Long
      Dim Msg As Long
       
       If Me.ScaleMode = vbPixels Then
        Msg = x
       Else
        Msg = x / Screen.TwipsPerPixelX
       End If
      
       Select Case Msg
        Case WM_LBUTTONUP        '514 restore form window
        
         Me.WindowState = vbNormal
         Result = SetForegroundWindow(Me.hWnd)
         Me.Show
         
         
        Case WM_LBUTTONDBLCLK    '515 restore form window
         
        
    If HideInTray = False Then
        HideInTray = True
        WindowState = vbMinimized
        Me.Hide
        
    Else
 
         Me.WindowState = vbNormal
         Result = SetForegroundWindow(Me.hWnd)
         Me.Show
         
         HideInTray = False
         
         Form1.Enabled = True
         Form1.SetFocus
         
    End If
        
        
       Case WM_RBUTTONUP        '517 display popup menu
                
         Result = SetForegroundWindow(Me.hWnd)
         Me.PopupMenu Me.mnuTray
       End Select



End Sub

Grazie

[StegcO]

Riesci ad allegare il progetto con la Line1?

[gibra]

Io non uso mai il Form proprio per evitare problemi di questo tipo che ho riscontrato diverse volte. Ad esempio se c'è un controllo alle coordinate 0,0 del form, il mousemove del form non può venire intercettato.

Di norma io uso un piccolo PictureBox in cui inserisco l'icona da mostrare nella tray, e gestisco il MouseMove nel PictureBox .

Non ti mostro codice perchè non cambia assolutamente niente, solo che alle funzioni API invece dell'handle (hWnd) del Form, passo quello del PictureBox.

Comunque se vuoi vedere un esempio, chiedi.

[S0nic]

Originariamente inviato da StegcO
Riesci ad allegare il progetto con la Line1?

purtroppo non posso postare il progetto in quanto ci sono info aziendali che non posso divulgare

Originariamente inviato da gibra
Io non uso mai il Form proprio per evitare problemi di questo tipo che ho riscontrato diverse volte. Ad esempio se c'è un controllo alle coordinate 0,0 del form, il mousemove del form non può venire intercettato.

Di norma io uso un piccolo PictureBox in cui inserisco l'icona da mostrare nella tray, e gestisco il MouseMove nel PictureBox .

Non ti mostro codice perchè non cambia assolutamente niente, solo che alle funzioni API invece dell'handle (hWnd) del Form, passo quello del PictureBox.

Comunque se vuoi vedere un esempio, chiedi.

bella idea

ci provo e vi aggiorno

tnks

[S0nic]

allora, con la picturebox non sono riuscito quindi ho inserito una nuova Form vuota
che utilizzo SOLO ed esclusivamente per la TrayIcon e funziona a meraviglia


Grazie a tutti!