webForumDet fria alternativet

Minimerad ikon

2 svar · 247 visningar · startad av msossna

msossnaMedlem sedan feb. 2002476 inlägg
#1

Hur gömmer man ner ett program i Meddelandefältet (där klockan finns)?

SBMedlem sedan maj 2000194 inlägg
#2

Du kan testa denna kod

uses 
 ShellAPI; 
... 
procedure TForm1.FormCreate(Sender: TObject); 
begin 
 MyIcon.cbSize:=SizeOf(MyIcon); 
 with MyIcon do 
 begin 
  Wnd:=Form1.Handle; 
  uID:=0; 
  uFlags:=NIF_ICON+NIF_TIP; 
  hIcon:=CopyIcon(Application.Icon.Handle); 
 end; 
 Shell_NotifyIcon(NIM_ADD, @MyIcon); 
end; 
 
procedure TForm1.FormDestroy(Sender: TObject); 
begin 
 Shell_NotifyIcon(NIM_DELETE, @MyIcon); 
end;
msossnaMedlem sedan feb. 2002476 inlägg
#3

Vilken typ är MyIcon, Wnd, uID, uFlags och hIcon? Antar att uFlags och uId integer?

Om jag vill uppdatera ikonen? Alltså byta ikon beroende på olika saker i programmet?

125 ms totalt · 3 externa anrop · v20260731065814-full.3ab8d573
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
123 ms — hämta tråd, inlägg och bilagor (db)