0 / 0 / 0
Регистрация: 09.10.2014
Сообщений: 10
1

Каков будет код для изображения иконки в трее, для Access 2002?

16.08.2009, 06:52. Показов 1094. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
С Уважением, Андрей...
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
16.08.2009, 06:52
Ответы с готовыми решениями:

Меню для иконки в трее
Помогите как можно создать в C# FORM менюю показанный внизу ...

Как отобразить контекстное меню для иконки в трее?
Добрый день! Подскажите пожалуйста, как запустить контекстное меню трея во время работы...

мне нужен код для С++ для поворота изображения
В университете задали(первый курс),проблема в том что я даже не могу понять как можно загрузить...

Смена иконки в трее
Как можно сменить иконку в трее, в установленной программе? Иконка появляется при запуске...

1
4 / 4 / 1
Регистрация: 25.07.2009
Сообщений: 43
18.08.2009, 04:28 2
Здравствуйте!

Воспользуйтесь для решения вашей задачи ф-ией Shell_NotifyIcon из Win32API. Вот примерный код, можно поместить его в модуль.
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
Private Declare Function Shell_NotifyIcon Lib 'shell32' Alias 'Shell_NotifyIconA' (ByVal dwMessage As Long, lpData As NOTIFYICONDATA) As Long
 
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
  
Private SysIcon As NOTIFYICONDATA, RunningInTray As Boolean
 
Private Sub ShowIcon(ByRef TrayForm As Form)
    ' Show the systray icon. Use from another form : 'SystrayIcon.ShowIcon'
    SysIcon.cbSize = Len(SysIcon)
    SysIcon.hWnd = TrayForm.hWnd
    SysIcon.uID = vbNull
    SysIcon.uFlags = 7
    SysIcon.uCallbackMessage = 512
    SysIcon.hIcon = TrayForm.Icon
    SysIcon.szTip = TrayForm.Caption + Chr(0)
    Shell_NotifyIcon 0, SysIcon
    RunningInTray = True
End Sub
 
Private Sub RemoveIcon(TrayForm As Form)
    ' Remove the systray icon. Use from another form : 'SystrayIcon.RemoveIcon'
    SysIcon.cbSize = Len(SysIcon)
    SysIcon.hWnd = TrayForm.hWnd
    SysIcon.uID = vbNull
    SysIcon.uFlags = 7
    SysIcon.uCallbackMessage = vbNull
    SysIcon.hIcon = TrayForm.Icon
    SysIcon.szTip = Chr(0)
    Shell_NotifyIcon 2, SysIcon
    RunningInTray = False
End Sub
0
18.08.2009, 04:28
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
18.08.2009, 04:28
Помогаю со студенческими работами здесь

Смена иконки в трее по клику
Доброго времени суток! Подскажите пожалуйста как по нажатии на button1 менялась иконка в трее? ...

Распознать иконки в системном трее
Помогите распознать иконки.

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

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

Текст в трее вместо иконки
День добрый! Подскажите как это чудо реализовать. Приложение висит в трее и естественно в трее...

Всплывающее окно иконки в трее
Ещё раз здравствуйте. Подскажите, пожалуйста, как сделать, чтобы при наступлении определённого...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru