Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/11: Рейтинг темы: голосов - 11, средняя оценка - 5.00
1 / 1 / 0
Регистрация: 30.03.2011
Сообщений: 44

Всплывающее сообщение из трея, как сделать?)

20.07.2011, 21:59. Показов 2221. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Всем доброго времени суток!
Добавил иконку в трей следующим способом:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
Private Declare Function Shell_NotifyIcon Lib "shell32.dll" Alias _
 
"Shell_NotifyIconA" (ByVal dwMessage As Long, lpData As NOTIFYICONDATA) As Long
 
 
 
Private Const NIM_ADD = &H0
 
Private Const NIM_MODIFY = &H1
 
Private Const NIM_DELETE = &H2
 
Private Const NIF_MESSAGE = &H1
 
Private Const NIF_ICON = &H2
 
Private Const NIF_TIP = &H4
 
 
 
Private Const WM_MOUSEMOVE = &H200
 
Private Const WM_LBUTTONDOWN = &H201
 
Private Const WM_LBUTTONUP = &H202
 
Private Const WM_LBUTTONDBLCLK = &H203
 
Private Const WM_RBUTTONDOWN = &H204
 
Private Const WM_RBUTTONUP = &H205
 
Private Const WM_RBUTTONDBLCLK = &H206
 
Private Const WM_MBUTTONDOWN = &H207
 
Private Const WM_MBUTTONUP = &H208
 
Private Const WM_MBUTTONDBLCLK = &H209
 
 
 
Private 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
 
 
 
Dim IconData As NOTIFYICONDATA
 
 
 
Private Sub Form_Load()
 
Picture1.Visible = False
 
IconData.cbSize = Len(IconData)
 
' События, связанные с иконкой будут отображаться в 
 
' Picture1_MouseMove
 
IconData.hWnd = Picture1.hWnd
 
IconData.ucallbackMessage = WM_MOUSEMOVE
 
' Изображение иконки
 
IconData.hIcon = Form1.Icon
 
IconData.uId = 1&
 
IconData.uFlags = NIF_ICON Or NIF_TIP Or NIF_MESSAGE
 
' Текст подсказки
 
IconData.szTip = "Пример помещения иконки в трей" & Chr$(0)
 
' Добавляем иконку в трей
 
Shell_NotifyIcon NIM_ADD, IconData
 
End Sub
 
 
 
Private Sub Form_Unload(Cancel As Integer)
 
' Удаляем иконку из трея
 
IconData.cbSize = Len(IconData)
 
IconData.hWnd = Picture1.hWnd
 
IconData.uId = 1&
 
Shell_NotifyIcon NIM_DELETE, IconData
 
End Sub
 
Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, _
 
X As Single, Y As Single)
 
' События, связанные с иконкой можно узнать по координате X
 
If X / Screen.TwipsPerPixelX = WM_LBUTTONDOWN Then _
 
MsgBox "Нажата левая кнопка мыши"
 
End Sub
Пол инета перерыл - никак не могу сделать всплывающее сообщение! Подскажите, пожалуйста!
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
20.07.2011, 21:59
Ответы с готовыми решениями:

Всплывающее окошко из трея с изображением
Собственно, нужно всплывающее окошко, с трея в него я буду пихать изображения! И было кликабельно! Жду мануал, а лучше примеры! Пробую...

Всплывающее уведомление в области трея
Помогите, ломаю голову несколько дней, как реализовать средствами WinApi? Программа умеет сворачиваться и разворачиваться из трея, вот...

Как сделать окно возле трея?
Хочу сделать такое окно: http://c2n.me/jqK5IK.png Как так можно сделать на C#? Желательно покажите исходники.

2
1705 / 574 / 74
Регистрация: 10.04.2009
Сообщений: 9,283
21.07.2011, 17:08
Извините, а Вы можете весь проект выложить, не знаю, что у Вас за Picture1.Visible = False
Хочу опробовать работу кода
Спасибо
0
1 / 1 / 0
Регистрация: 30.03.2011
Сообщений: 44
21.07.2011, 17:50  [ТС]
Добавьте просто Picture на форму и все) Никто не знает как сделать всплывающее окно?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
21.07.2011, 17:50
Помогаю со студенческими работами здесь

Как показать уведомление (сообщение) из трея
Здравствуйте, подскажите пожалуйста как послать уведомление (сообщение) из трея? У меня такой код для трея: Option Explicit ...

Как сделать активным приложение при выходе из трея C#
сворачиваю через notifyIcon в трей, потом при двойном щелчке: private void notifyIcon1_MouseDoubleClick(object sender,...

Как сделать размещение формы чуть выше системного трея
Для примера, Skype при новом сообщении выводит своё окошко в трее, Auslogics BoostSpeed при появлении новой версии также оповещает об этом....

Как сделать всплывающее меню
как здесь:

Как сделать всплывающее окно
Понравилась кнопка всплывающая на одном сайте, через файр бег скопировал код кнопки, но на моем сайте оно не работает. Подскажите...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Access
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
Создание Single Page Application на фреймах
krapotkin 16.11.2025
Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru