Delphi-Quellcode:
// OnFormCreate
...
// Hinweis im TrayIcon
CoolTrayIcon1.Hint := Name + Nummer;
CoolTrayIcon1.PopupMenu := PopUpMenu1;
CoolTrayIcon1.IconVisible := true;
Das ist alles was ich an Code fürs TrayIcon habe!
Ich hab nun herausgefunden warum ich zwei TrayIcons hatte. Und zwar weil ich versehentlich "DesignPreview" auf True gesetzt hatte.
Allerdings sehen die beiden Icons (sind die gleichen) unterschiedlich aus!
(s. Anhang)
Bei dem von dem DesignPreview geht auch das PopUp bei dem Anderen allerdings nicht