Tray Icon während der Laufzeit ändern

[Schodn]

Hallo wie kann ich das
Tray Icon während der Laufzeit ändern
Bitt um schnelle Hilfe
mfg
Franz[quote]

[Matze]

Wenn du das Icon mittels TNA erstellst, geht es in der Art:

Delphi-Quellcode:

  //TNA-Icon
  //========
  IconData.hIcon := //Handle
  IconData.cbSize := SizeOf(IconData);
  IconData.Wnd := Handle;
  IconData.uID := 100;
  IconData.uFlags := NIF_MESSAGE + NIF_ICON + NIF_TIP;
  IconData.uCallBackMessage := WM_USER + 20;
  IconData.szTip := 'Text';

  //TNA-Icon aktualisieren
  Shell_NotifyIcon(NIM_MODIFY, @IconData);

[Muetze1]

Moin!

Dann bitte ich mal um schnelle Antworten:

1. Wie erstellst du das Tray Icon? Per Komponente? Selber?
2. Welche Komponente verwendest du (wenn du eine nutzt)?
3. Wie liegen die neuen Icons vor? Als Resource, als Bitmap, als Icon?

Unsere Glaskugeln kosten auch Geld und Zeit bei der Wartung, also helfe mit sie zu schonen!

MfG
Muetze1

[glkgereon]

Was benutzt du für ein TrayIcon?
CoolTrayIcon? den CodeLib-Code von Luckie?

[MathiasSimmack]

Zitat von Matze:

Wenn du das Icon mittels TNA erstellst, geht es in der Art:

[...]

Zuviel des Guten, Matze. Das neue Icon und der "Shell_NotifyIcon"-Befehl reichen in dem Fall. Die anderen Werte wurden ja schon beim Erzeugen/Initialisieren festgelegt.