Скачать: CL | DM;

Иконка в трее в Win2k   Найти похожие ветки 

← →
Brutusss   (2003-03-20 11:29) [0]

Вот где-то статью читал про работу с иконкой в трее. Но под Win2k это оказалось неработоспособным. Подскажите плииз! Где можно нарыть статей про свертывание в трей в Win2000?

---

← →
Игорь Шевченко ©   (2003-03-20 11:42) [1]

FAQ

---

← →
S.A.S   (2003-03-20 13:03) [2]

Посмотри исходники Borland Socket Server (..DelphiDir\Source\VCL\scktcrvr.dpr). В ScktMain.pas процедура AddIcon. Все везде работает. "if not NT351 then" - можешь убрать оставь :

with FIconData do
begin
cbSize := SizeOf(FIconData);
Wnd := Self.Handle;
uID := $DEDB;
uFlags := NIF_MESSAGE or NIF_ICON or NIF_TIP;
hIcon := Forms.Application.Icon.Handle;
uCallbackMessage := WM_MIDASICON;
StrCopy(szTip, PChar(Caption));
end;
Shell_NotifyIcon(NIM_Add, @FIconData);

Определишь: const WM_MIDASICON = $0400 + 1;

В общем посмотри ScktMain.pas - разберешься, заодно и ограничение на запуск одной копии программы есть пример.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.021 c