Использовать системный трей и значки в VBA (Access) - PullRequest
Новая
       33

Использовать системный трей и значки в VBA (Access)

1 голос
/ 08 марта 2010

Я нашел несколько учебных пособий, в которых объясняется, как использовать Windows API для получения пользовательского значка в системном трее.

Это все для Visual Basic, и они не масштабируются.для VBA хорошо.

Я следую этому короткому руководству: http://atchoo.org/vb/systray.php

По сути, вы должны установить значение hIcon (переменная 'long'), но оно не работает.Я пытался использовать функцию LoadPicture (), которая не выдает мне никаких ошибок, но также не может добавить новый значок.

Я не могу предоставить Me.Icon и не могу установить егоForm_Load.

У кого-нибудь есть опыт работы с этим?

1 Ответ

3 голосов
/ 08 марта 2010

Использование loadpicture было правильным подходом, но не напрямую.Сначала я должен был определить новую переменную и загрузить ее.

Примерно так: 

Dim myPicture As IPictureDisp
strPath = "F:\Databank\Icons\stone.ico"
Set myPicture = LoadPicture(strPath)

А потом где-нибудь по пути я мог без проблем установить hIcon: 

.hIcon = myPicture

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

...