| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Взаимодействие сервиса NT с System Tray
zxss © (2003-02-20 08:42:00)Доброго утра. Вопросик.
Имеется программа-почтовый сервер, написанная на Delphi. Программа выполнена в виде многопоточного сервиса NT. Работает под Win2000 Server. В программе имеется процедура помещения иконки программы в Tray и удаления ее оттуда. Через иконку вызывается окно настроек сервера. Но когда сервис стартует при загрузке ОС, в самой ОС пользователь еще не зарегистрирован, рабочего стола и панели задач еще нет. Как, собственно, и Tray-а. Поэтому в момент старта сервиса поместить иконку некуда. Значит ее надо помещать туда в момент после регистрации пользователя.
Вопрос: как можно внутри сервиса получить от Windows информацию о локальной регистрации (Logon) пользователя и появлении Tray-а. И по завершении сеанса работы пользователя (Logout) каким образом получить сообщение о необходимости убрать иконку?
Если с помощью сообщений Windows, то каких именно. Хотя даже в этом случае остается вопрос как их принять, ведь сервис не имеет окна программы, и, соответственно, не имеет оконной процедуры принятия сообщений.
С уважением, Евгений.
zxss (2003-02-20 14:00:00) [1]Это лишь частичное решение, т.к. чтобы показывать/скрывать иконку мне придется в таймере постоянно опрашивать эту функцию. Т.е. это вроде и решение, но некрасивое какое-то :).
Ruf (2003-02-20 12:38:00) [2]Попробуй найти Tray так:
h:=FindWindow("Shell_TrayWnd",nil);
Если h>0, то Tray есть.
| |
