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

Мигание в Systme Tray   Найти похожие ветки 

← →
AloneAli   (2004-03-02 15:09) [0]

Как заставить мигать иконку программы в System Tray? Что-то вертиться в голове, а вспомнить не могу... Помогите!

---

← →
Kerk ©   (2004-03-02 15:11) [1]

А что тут вспоминать... ???
Меняй иконки через какой-то интервал времени и все...

---

← →
fatal ©   (2004-03-02 15:20) [2]

Поствь таймер и используй Shell_NotifyIcon( NIM_MODIFY, @nid );

procedure TCtrlFrm.Timer111Timer(Sender: TObject);
var nid : TNotifyIconData;
begin
with nid do
begin
cbSize := SizeOf( TNotifyIconData );
Wnd := CtrlFrm.Handle;
uID := 1;
uFlags :=NIF_ICON or NIF_MESSAGE or NIF_TIP;
uCallbackMessage := WM_USER + 1010;
hIcon := CtrlFrm.Icon.Handle;
szTip := "TimeOrganizer v 2.4 beta";
end;
Shell_NotifyIcon( NIM_MODIFY, @nid );
end;

---

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

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



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