Minimieren/Schließen - Problem mit CoolTrayIcon

[Yheeky]

Hi,

folgendes: Ich benutze die Komponente CoolTrayIcon. Ich habe in der Mainform beim Klicken auf das "Kreuz" in die OnCloseQuery Prozedure folgendes geschrieben:

Delphi-Quellcode:

CanClose := False;
CoolTrayIcon1.HideMainForm;

Die Mainform - bei mir frmMain - wird also nicht geschlossen, sondern nur in die TNA minimiert (über die Komponente CoolTrayIcon).
Soweit, so gut - das klappt wunderbar. Durch ein PopUp kann ich das Programm mit Application.Terminate beenden. Mein Problem ist nun, dass ich das Programm per Autostart mit Windows lade bzw. dem User diese Funktion zur Verfügung stelle. Wenn ich nun meinen Computer herunterfahren möchte, lässt sich das Programm nicht schliessen, sondern führt dazu, dass Windows nicht herunterfährt. Durch CanClose wird das verhindert. Ich kann es aber auch nicht weglassen, sonst schliesst sich das Programm jedes Mal, wenn man in der Mainform auf das Kreuz klickt.
Wie kann ich das Problem beheben?

Ich hoffe jemand hat eine Idee.