Shell_NotifyIcon beenden?

[Bunnepeller]

Hallo.

Ich muß unter NT ein Shell_NotifyIcon in einer tna unterbringen.
Mit

Delphi-Quellcode:

ShowWindow(Application.Handle, SW_HIDE);
Shell_NotifyIcon(NIM_ADD, @NID);

habe ich die Application aus der Taskbar ausgeblendet und der Area das
TNotifyIconData zugefügt.
Das funktioniert auch soweit ganz gut. Aber...
Wenn ich Windows-NT beenden möchte bleibe ich am Taskmanager hängen.
Das Betriebsystem kann offensichtlich nicht die Application beenden.
Die WM_QUERYENDSESSION Message kommt nur an, wenn ein Fenster geöffnet ist
bzw. die Application als "Anwendung" im Taskmanager auftauch.

Wie kriege ich die Application beim beenden von Windows geschlossen?
Bei XP ist das Message-Handling anders, da gibt es das Problem nicht.