Systray Icon verschwindet

[cyberrowdy72]

Hallo.
Ich habe in der FormCreate-Procedure folgenden Quellcode

Delphi-Quellcode:

  IconData.cbSize := SizeOf(IconData);
  IconData.Wnd := Handle;
  IconData.uID := 100;
  IconData.uFlags := NIF_MESSAGE + NIF_ICON + NIF_TIP;
  IconData.uCallBackMessage := WM_USER + 20;
  IconData.hIcon := Application.Icon.Handle;
  Shell_NotifyIcon(NIM_ADD, @IconData);

Meine Application startet mit
Formstyle := fsStayOnTop; Wenn ich aber auf fsNormal umschalte, verschwindet mein Icon wieder aus dem Tray. Dasselbe passiert, wenn ich den BorderStyle von bsToolWindow auf bsNone ändere.

Was mach ich da falsch?