Habe momentan leider keine Zeit zu testen, aber auf die Schnelle mit Google bei den Kollegen von SO gefunden:
Delphi-Quellcode:
var
Bmp: TBitmap;
begin
Bmp := TBitmap.Create;
try
ImageList1.GetBitmap(0, Bmp);
TrayIcon1.Icon.Assign(Bmp);
TrayIcon1.Show;
finally
Bmp.Free;
end;
Eventuell statt TBitmap ein TPNGImage verwenden, aber die Vorgehensweise sollte klar sein.
Die ImageList füllst du zur Designtime über Doppelklick.
Du musst - im Bezug auf das TrayIcon - eine „externe“ ImageList verwenden.
IMHO dient die ImageList des TrayIcon der Animation des TrayIcons.
Beste Grüße!
EDIT: Geht eventuell auch ohne den Umweg über ein Bitmap-Objekt:
ImageList1.GetIcon(0, TrayIcon1.Icon);