Страница: 1 |
Страница: 1 |
Вопрос: Не исчезает popup меню в трее
Добавлено: 08.11.04 17:27
Автор вопроса: Rebel | Web-сайт:
менюшка с картинками (SetMenuItemBitmaps) и заголовком (подмена WindowProc), в WindowProc для uMsg описаны WM_MEASUREITEM и WM_DRAWITEM для всех остальных идет вызов старой WndProc. В итоге пока в этой менюшке че-нить не нажмешь - с экрана не уберется :( как лечить??
аналогтчная ситуация и с другой менюшкой, там без WndProc, а только SetMenuItemBitmaps.
в чем дело? помогите плз...
Ответы
Всего ответов: 2
Номер ответа: 1
Автор ответа:
dNW
Вопросов: 30
Ответов: 683
Профиль | | #1
Добавлено: 08.11.04 17:50
http://vbnet.ru/forum/show.aspx?id=59649
Номер ответа: 2
Автор ответа:
Barsik
Разработчик Offline Client
ICQ: 343368641
Вопросов: 17
Ответов: 686
Web-сайт:
Профиль | | #2
Добавлено: 08.11.04 21:33
Public Declare Function SetForegroundWindow Lib "user32" (ByVal hWnd As Long) As Long
Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Public Type NotifyIconData
cbSize As Long
hWnd As Long
uID As Long
uFlags As Long
uCallbackMessage As Long
hIcon As Long
szTip As String * 64
End Type
Private Const WM_NULL = &H0
Public TaskIcon As NotifyIconData
Public Function PopupMnu(Form As Form, PopMenu As Menu, Optional mnuFlags, Optional X, Optional Y, Optional DefultMenu)
SetForegroundWindow (TaskIcon.hWnd)
Form.PopupMenu PopMenu, mnuFlags, X, Y, DefultMenu
PostMessage TaskIcon.hWnd, WM_NULL, 0, 0
End Function