SysTray - Форум на исходниках

WWW.ИСХОДНИКИ.РУ cpp.sources.ru

java.sources.ru web.sources.ru soft.sources.ru

jdbc.sources.ru asp.sources.ru api.sources.ru

  Форум на исходниках
  Visual Basic
  SysTray
СПРОСИТЬ  ОТВЕТИТЬ
профайл | регистрация | faq

Автор Тема:   SysTray

Sys опубликован 13-01-2002 00:27 MSK
Еще маленький вопросик....
Как мне написать popup menu при клике правой кнопкой мыши на иконке моей проги в SysTray'е???Нужна ли мне systray.ocx...У меня её нет =(((
Vasya2000 опубликован 13-01-2002 12:24 MSK
хороший пример:
http://vb-studio.boom.ru/programs/trayicon.zip
Lamer опубликован 13-01-2002 22:14 MSK
Установи пораметр Callback на клик и передай в ф-ции хендл твоей формы. А в процедуре Form_Click используй оператор popupmenu!
netcyberg опубликован 14-01-2002 02:59 MSK
To Lamer: пожалуйста, свяжитесь со мной по email: info@bezone.dk
это важно...
p.s ваш e-mail в инфо указан не правильно.
AlexR опубликован 14-01-2002 15:44 MSK
'Попробуй это:
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button And vbRightButton Then
PopupMenu mnuPopup
End If
End Sub
Private Sub mnu3_Click()
MsgBox "Ты выбрал Меню3"
End Sub
Private Sub mnu2_Click()
MsgBox "Ты выбрал Меню2"
End Sub
Private Sub mnu1_Click()
MsgBox "Ты выбрал Меню1"
End Sub
Sys опубликован 14-01-2002 16:36 MSK
К сожалению пример не катит ....
AlexR опубликован 14-01-2002 19:35 MSK
Создай меню с именем mnuPopup, сделай Visible = False, а потом создай подменю с именами mnu1, mnu2, mnu3. Ну дальше код.
Sys опубликован 14-01-2002 22:23 MSK
To AlexR:
Всё прекрасно санкс.....только я хотел не меню на форме а меню на иконке в SysTray'е правой кнопкой мышки.............
Vasya2000 опубликован 15-01-2002 13:43 MSK
У меня пример очень даже хорошо катит.
Sys опубликован 15-01-2002 17:19 MSK
У меня катит я ничего не говорю...но я просил пример не для формы а для трэя....
Vasya2000 опубликован 15-01-2002 17:29 MSK
Не понимаю. У меня появляется икона в трее и по клику на ней появляется popupmenu.
AlexR опубликован 15-01-2002 17:33 MSK
Я тебе уже послал systray.ocx
Vasya2000 опубликован 16-01-2002 06:32 MSK
to AlexR
слушай, вышли мне плиз тожа ентот ocx, а то я чегото не въезжаю.........
AlexR опубликован 16-01-2002 17:47 MSK
Уже выслал.
Vasya2000 опубликован 17-01-2002 13:48 MSK
не знаю что ты мне там выслал, но никакого осх к письму не прилагалось. попробуй еще раз, плиз
Sys опубликован 17-01-2002 15:51 MSK
Спасибо to AlexR за *.ocx
С ней всё просто и легко....=)))
AlexR опубликован 17-01-2002 19:27 MSK
to Vasya2000: Хорошо, сейчас вышлю.
СПРОСИТЬ  ОТВЕТИТЬ
Перейти:

E-mail | WWW.ИСХОДНИКИ.RU

Powered by: Ultimate Bulletin Board, Freeware Version 5.10a
Purchase our Licensed Version- which adds many more features!
© Infopop Corporation (formerly Madrona Park, Inc.), 1998 - 2000.

Автор	Тема: SysTray
Sys	опубликован 13-01-2002 00:27 MSK Еще маленький вопросик.... Как мне написать popup menu при клике правой кнопкой мыши на иконке моей проги в SysTray'е???Нужна ли мне systray.ocx...У меня её нет =(((
Vasya2000	опубликован 13-01-2002 12:24 MSK хороший пример: http://vb-studio.boom.ru/programs/trayicon.zip
Lamer	опубликован 13-01-2002 22:14 MSK Установи пораметр Callback на клик и передай в ф-ции хендл твоей формы. А в процедуре Form_Click используй оператор popupmenu!
netcyberg	опубликован 14-01-2002 02:59 MSK To Lamer: пожалуйста, свяжитесь со мной по email: info@bezone.dk это важно... p.s ваш e-mail в инфо указан не правильно.
AlexR	опубликован 14-01-2002 15:44 MSK 'Попробуй это: Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button And vbRightButton Then PopupMenu mnuPopup End If End Sub Private Sub mnu3_Click() MsgBox "Ты выбрал Меню3" End Sub Private Sub mnu2_Click() MsgBox "Ты выбрал Меню2" End Sub Private Sub mnu1_Click() MsgBox "Ты выбрал Меню1" End Sub
Sys	опубликован 14-01-2002 16:36 MSK К сожалению пример не катит ....
AlexR	опубликован 14-01-2002 19:35 MSK Создай меню с именем mnuPopup, сделай Visible = False, а потом создай подменю с именами mnu1, mnu2, mnu3. Ну дальше код.
Sys	опубликован 14-01-2002 22:23 MSK To AlexR: Всё прекрасно санкс.....только я хотел не меню на форме а меню на иконке в SysTray'е правой кнопкой мышки.............
Vasya2000	опубликован 15-01-2002 13:43 MSK У меня пример очень даже хорошо катит.
Sys	опубликован 15-01-2002 17:19 MSK У меня катит я ничего не говорю...но я просил пример не для формы а для трэя....
Vasya2000	опубликован 15-01-2002 17:29 MSK Не понимаю. У меня появляется икона в трее и по клику на ней появляется popupmenu.
AlexR	опубликован 15-01-2002 17:33 MSK Я тебе уже послал systray.ocx
Vasya2000	опубликован 16-01-2002 06:32 MSK to AlexR слушай, вышли мне плиз тожа ентот ocx, а то я чегото не въезжаю.........
AlexR	опубликован 16-01-2002 17:47 MSK Уже выслал.
Vasya2000	опубликован 17-01-2002 13:48 MSK не знаю что ты мне там выслал, но никакого осх к письму не прилагалось. попробуй еще раз, плиз
Sys	опубликован 17-01-2002 15:51 MSK Спасибо to AlexR за *.ocx С ней всё просто и легко....=)))
AlexR	опубликован 17-01-2002 19:27 MSK to Vasya2000: Хорошо, сейчас вышлю.