Тема: Свернуть
Показать сообщение отдельно
  #6  
Старый 13.10.2008, 12:28
AlexSku AlexSku вне форума
Специалист
 
Регистрация: 07.05.2007
Адрес: Москва
Сообщения: 884
Репутация: 21699
По умолчанию

Флаги - это какие поля будут обслуживаться:
NIF_ICON, NIF_MESSAGE, NIF_TIP.
Команды (dwMessage):
NIM_ADD, NIM_DELETE, NIM_MODIFY.
Код:
var
  tnd: TNotifyIconData;
begin
  with tnd do
  begin
    cbSize:= SizeOf(TNotifyIconData);
    Wnd:= Handle; // Окно, к-е ловит сообщение
    uID:= 1;   // Номер пиктограммки
    uFlags:= { набор флагов по ИЛИ}; 
    uCallbackMessage:= IconMessage; { номер сообщения, которое будет перехватывать ф-ция}
    hIcon:= FIcon.Handle; // хэндл пиктокграммки
    szTip:= 'Текст подсказки'#0;
  end;
  Result:= Shell_NotifyIcon(dwMessage, @tnd);
end;
Ответить с цитированием