Содержание материала

В Windows 2000, формат структуры NotifyIconData, которая используется для работы с иконками в Трее (которая, кстати, называется "The Taskbar Notification Area" :) значительно отличается от предыдущий версий Windows. Однако, эти изменения НЕ отражены в юните ShellAPI.pas в Delphi 5.

 

Итак, нам понадобится преобразованный SHELLAPI.H, в котором присутствуют все необходимые объявления:

Code:

uses Windows;

 

type

NotifyIconData_50 = record // определенная в shellapi.h

   cbSize: DWORD;

   Wnd: HWND;

   uID: UINT;

   uFlags: UINT;

   uCallbackMessage: UINT;

   hIcon: HICON;

   szTip: array[0..MAXCHAR] of AnsiChar;

   dwState: DWORD;

   dwStateMask: DWORD;

   szInfo: array[0..MAXBYTE] of AnsiChar;

   uTimeout: UINT; // union with uVersion: UINT;

   szInfoTitle: array[0..63] of AnsiChar;

   dwInfoFlags: DWORD;

end {record};

 

const

NIF_INFO = $00000010;

 

NIIF_NONE = $00000000;

NIIF_INFO = $00000001;

NIIF_WARNING = $00000002;

NIIF_ERROR = $00000003;

 

А это набор вспомогательных типов:

Code:

type

TBalloonTimeout = 10..30 {seconds};

TBalloonIconType = (bitNone, // нет иконки

   bitInfo,    // информационная иконка (синяя)

   bitWarning, // иконка восклицания (ж?лтая)

   bitError);  // иконка ошибки (краснаа)

 

Добавить комментарий

Не использовать не нормативную лексику.

Просьба писать ваши замечания, наблюдения и все остальное,
что поможет улучшить предоставляемую информацию на этом сайте.

ВСЕ КОММЕНТАРИИ МОДЕРИРУЮТСЯ ВРУЧНУЮ, ТАК ЧТО СПАМИТЬ БЕСПОЛЕЗНО!


Защитный код
Обновить