Работа с системной панелью

Некоторые приложения, написанные для Windows 95 и Windows NT версии 4, ра-отают в системной панели - небольшой прямоугольной области, расположенной в правой части панели задач (см. рисунок). На системную панель часто помещаются приложения, управляющие различными устройствами

или работающие по расписанию. Скорее всего, на вашем компьютере в системной панели находятся часы и, возможно, значок с динамиком для регулировки громкости. 3 комплект Visual Basic входит пример, который компилируется в элемент ActiveX. Мы воспользуемся им для того, чтобы поместить приложение на системную панель.

Издание элемента SysTray

Перед тем как пользоваться элементом ActiveX в приложении, необходимо отком-шлировать его и сохранить в подкаталоге \System каталога Windows. Элемент троится так:

Откройте проект Systray.vbp из каталога \Cornmon\Tools\VB\Unsupprt\Systray на компакт-диске Visual Basic.

В окне проекта откройте папку Modules и дважды щелкните на строке mSysTray, чтобы открыть модуль в окне программы.

Просмотрите секцию (Global)(Declarations) модуля. Обратите внимание на объявления нескольких функций API, среди которых — CallWindowProc, GetWindowLong и Shell_NotifyIcon (рис. 19.5). Наряду с прочими они помещают значок программы на системную панель. Мы не будем подробно рассматривать тонкости их работы, однако вы можете просмотреть исходный текст программы и ознакомиться с комментариями, чтобы понять, как работает данный элемент.

Рис. 19.5. Объявления функций API

3. Выполните команду File > Make Systray.ocx.

4. В диалоговом окне Make Project укажите в поле Save In подкаталог \System каталога, в котором установлена система Windows. На большинстве компьютеров это будет C:\Windows\System.

5. Нажмите кнопку О К, чтобы завершить компиляцию элемента.

Элемент SysTray готов к работе.