Работа Tray

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
GoGosha
Постоялец
Постоялец
 
Сообщения: 642
Зарегистрирован: 02.08.2002 (Пт) 9:14
Откуда: Russia

Работа Tray

Сообщение GoGosha » 22.04.2003 (Вт) 20:22

Как поместить иконку в трей я знаю. А как обрабатывать нажатия на иконку и открывать меню по ней

Gigahard
Бывалый
Бывалый
 
Сообщения: 253
Зарегистрирован: 24.07.2002 (Ср) 11:15
Откуда: Russia

Сообщение Gigahard » 22.04.2003 (Вт) 23:12

Вот ссылочка, там есть... http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b176085 А если еще чего нужно, то поройся еще на микрософтовском поиске... Я там много чего интересного откапывал.

Firestorm
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 946
Зарегистрирован: 02.05.2002 (Чт) 14:36
Откуда: Russia

Сообщение Firestorm » 23.04.2003 (Ср) 4:36

например тут посматри :lol:
http://www.planet-source-code.com/vb/sc ... =tray+menu
...просто гламурный падонак...
_________________
reborn! v.2 :twisted:
_________________

Ronin_1978
Новичок
Новичок
 
Сообщения: 46
Зарегистрирован: 05.04.2003 (Сб) 14:42
Откуда: Москва

Сообщение Ronin_1978 » 23.04.2003 (Ср) 7:41

Можно посмотреть ещё вот здесь:
http://vb74rus.narod.ru/ActiveX.htm

GoGosha
Постоялец
Постоялец
 
Сообщения: 642
Зарегистрирован: 02.08.2002 (Пт) 9:14
Откуда: Russia

Сообщение GoGosha » 24.04.2003 (Чт) 16:36

Ничего подходящего :cry::cry
По первой ссылке этого нет, по второй вообще ничего нет, а контрол с прогой не хочется таскать

boevik
Обычный пользователь
Обычный пользователь
 
Сообщения: 72
Зарегистрирован: 23.07.2002 (Вт) 11:44
Откуда: Israel

Сообщение boevik » 24.04.2003 (Чт) 17:02

Код для обработки нажатия мышкой:

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim goParam As New DBAccess.CParam
'Возможные нажатия клавиши мышки:
'Hex Value Meaning
'1E0F' Left button down
'1E1E' Left button up
'1E3C' Right button down
'1E4B' Right button up
'1E2D' Left button double-click
'1E5A' Right button double-click
Select Case Hex(X)
Case "1E3C"
Me.PopupMenu mnuPopupMenu
Case "1E2D"
mnuDefine_Click
Case Else
End Select

End Sub

Firestorm
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 946
Зарегистрирован: 02.05.2002 (Чт) 14:36
Откуда: Russia

Сообщение Firestorm » 25.04.2003 (Пт) 5:29

криво ищешь значит :evil:

вот выкладываю нексколько... не знаю какие ты пример ы смотрел, но я то думал, что в большинстве случаев в примерах будут показаны примеры на реакции кнопок мыши :lol:

p.s. и на будущее: существует полно поисковиков и сайтов с примерами (тот же planet-source-code.com чего стоит...) ... :idea: :twisted:
Вложения
sys_tray.zip
1
(2.6 Кб) Скачиваний: 107
sys_tray_icon.zip
2
(2.73 Кб) Скачиваний: 106
tray.zip
3
(8.86 Кб) Скачиваний: 99
...просто гламурный падонак...
_________________
reborn! v.2 :twisted:
_________________

Firestorm
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 946
Зарегистрирован: 02.05.2002 (Чт) 14:36
Откуда: Russia

Сообщение Firestorm » 25.04.2003 (Пт) 5:33

P.S.: а чё больше файлы не заливаются? :evil:
...просто гламурный падонак...
_________________
reborn! v.2 :twisted:
_________________

GoGosha
Постоялец
Постоялец
 
Сообщения: 642
Зарегистрирован: 02.08.2002 (Пт) 9:14
Откуда: Russia

Сообщение GoGosha » 25.04.2003 (Пт) 18:32

Firestorm писал(а):криво ищешь значит :evil:

вот выкладываю нексколько... не знаю какие ты пример ы смотрел, но я то думал, что в большинстве случаев в примерах будут показаны примеры на реакции кнопок мыши :lol:

p.s. и на будущее: существует полно поисковиков и сайтов с примерами (тот же planet-source-code.com чего стоит...) ... :idea: :twisted:


Либо у меня архиватор старый, либо файлы кривые. Все файлы имеют
Злой RAR писал(а):Unexpected end of file

Yat
Начинающий
Начинающий
 
Сообщения: 3
Зарегистрирован: 25.04.2003 (Пт) 18:33
Откуда: Москва

Извини

Сообщение Yat » 25.04.2003 (Пт) 18:56

Ты не ковалев Георгий? Я Настя Лебедева, случайно сюда забрела. Если ты - это ты, ответь пожалуйста

GoGosha
Постоялец
Постоялец
 
Сообщения: 642
Зарегистрирован: 02.08.2002 (Пт) 9:14
Откуда: Russia

Re: Извини

Сообщение GoGosha » 25.04.2003 (Пт) 19:06

Yat писал(а):Ты не ковалев Георгий? Я Настя Лебедева, случайно сюда забрела. Если ты - это ты, ответь пожалуйста


Нет, не Ковалёв. Я вижу, ты его так уважаешь, что пишешь фамилию с маленькой буквы...

GoGosha
Постоялец
Постоялец
 
Сообщения: 642
Зарегистрирован: 02.08.2002 (Пт) 9:14
Откуда: Russia

Re: Извини

Сообщение GoGosha » 25.04.2003 (Пт) 19:07

Yat писал(а):Ты не ковалев Георгий? Я Настя Лебедева, случайно сюда забрела. Если ты - это ты, ответь пожалуйста

Нет, я-это не я

Dagobert
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 141
Зарегистрирован: 21.12.2002 (Сб) 6:48
Откуда: Russia

Сообщение Dagobert » 08.05.2003 (Чт) 3:07

Можно взять модуль с
http://www25.brinkster.com/msvbasic/default.asp?p=src&s=TrayIcon.bas.
Потом создаёшь пустую форму, делаешь субклассирование.
http://www25.brinkster.com/msvbasic/default.asp?p=subclass&s=misc
И ловишь сообщение WM_SYSTRAY.
Наверняка можно по другому и проще, но сейчас только это на ум приходит.


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: SemrushBot, Yandex-бот и гости: 73

    TopList