Hallo,
ich hab hier mal eine
Unit zum Verwalten des Trayicons geschrieben.
Enthaltene Funktionen:
Delphi-Quellcode:
Anzeigen/Verstecken (Beim Beenden wird das Icon automatisch entfernt)
Icon ändern (Standard = application.icon)
Bubblemessage ausgebem (Parameter: Titel, Text, Timeout, Typ (msinfo,mswarning,mserror), bubble anzeigen obwohl kein Icon:boolean)
die
Unit ist
nonVCL-kompatibel. Sie verwendet
Delphi-Quellcode:
uses
shellapi, windows, classes;
Beigefügt ist eine kurze Beispielanwendung (D7Pers), die die Unitfunktionen umsetzt.