icone et systray Résolu

Question

je m'explique mon application permet d'affiche
une icone dans la barre des tache de windows (systray) moi je vaudrai
change cette icone et je ne sais pas comment faire





merci d'avance

cs_Kenavo · Accepted Answer

Salut,



En gros, c'est comme pour en cr&#233;er un, sauf le flag NIM_MODIFY dans la fonction Shell_NotifyIcon (au lieu de NIM_ADD pour le cr&#233;er et NIM_DELETE pour l'enlever)



var

  TNid: TNotifyIconData;

begin

  with TNid do

  begin

    cbSize :=   sizeof(TNotifyIconData);

    Wnd := Handle;        
              
             // m&#234;mes param&#232;tres qu'&#224; la cr&#233;ation         

    uId : = 1;

    uFlags :=  NIF_ICON or NIF_MESSAGE or NIF_TIP;

    uCallbackMessage := MYWM_NOTIFYICON;

    szTip := 'La plus belle appli du monde';

    hIcon := Image1.Picture.Icon.Handle;               // nouvelle icone 

   end ;

  Shell_NotifyIcon(NIM_MODIFY, @TNid);

end;


Ken@vo

<hr size  ="2" width="100%">Code, Code, Codec !

[%3C/body ]

jinh68 · Answer

Salut,



Utilises l'API Shell_NotifyIcon avec le dwMessage NIM_MODIFY en param&#232;tre.

j!nH

toysf · Answer

merci et je vais essai  avc ces codes

Merci infiniment 

et 

a+++

toysf · Answer

Ca marche kenavo merci pour ton aide,

et a toi aussi jinh68



a+++ delphiens

Icone et systray

4 réponses

Votre réponse

Discussions similaires