проблема с меню
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 2
• Страница 1 из 1
- v-adix
- Постоялец
- Сообщения: 490
- Зарегистрирован: 14.11.2002 (Чт) 15:11
проблема с меню
v-adix » 20.03.2004 (Сб) 17:55
ещё одна проблемка возникла. я создаю иконку в трэе, и при клике по нему выскакивает меню. проблема в том что меню не закрывается когда я кликаю по десктопу. как это исправить ?
- JohnK
- Постоялец
-
- Сообщения: 874
- Зарегистрирован: 03.08.2002 (Сб) 0:35
- Откуда: 48.02` 37.58`
JohnK » 21.03.2004 (Вс) 3:16
Вот тебе лекарство!
Public 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 Const WM_NULL = 0
Public Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As Long) As Long
SetForegroundWindow Me.hwnd
PopupMenu mnuAppPopup
PostMessage Me.hwnd, WM_NULL, 0, 0
На здоровьеце!
Public 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 Const WM_NULL = 0
Public Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As Long) As Long
SetForegroundWindow Me.hwnd
PopupMenu mnuAppPopup
PostMessage Me.hwnd, WM_NULL, 0, 0
На здоровьеце!
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty
Сообщений: 2
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 4