• Home
 · 
• Windows API Call/Explanation
 · 
• Eliminates the system tray popup menu problem popup menu doesn¡t dissapear when click outside it

Eliminates the system tray popup menu problem popup menu doesn¡t dissapear when click outside it

Eliminates the system tray popup menu problem "popup menu doesn¡t dissapear when click outside it"

API Declarations


Lib "user32" (ByVal hwnd As Long) As Long



Rate Eliminates the system tray popup menu problem popup menu doesn¡t dissapear when click outside it

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Result = SetForegroundWindow(Me.hwnd)

'the following is a code context example ,assuming that you already have your 
'application icon on the system tray

Private Sub Picture1_MouseMove _
            (Button As Integer, _
             Shift As Integer, _
             X As Single, Y As Single)
    If Button = 2 Then
        DoEvents
           Result = SetForegroundWindow(Me.hwnd)
           Me.PopupMenu Me.mnuShell 'mnuShell is the name of the menu to be popup'ed

    End If
End Sub