[Delphi] Zamykanie

Witam,
da się tak zrobić że po klinięciu na krzyżyk (ten do zamykania programu :) ) program spadał do traya??? Używając komponentu Cool Tray Icon :) Tylko bez blokowania całkowitej możliwości zamykania programu! Np. po naciscnęci buttona ZAMKNIJ aplikacja się zamkła!

w OnCloseQuerry:
CanClose:=False;
Minimalizuj_Do_Traya--Vogel [Delphi 6 PE]

Life is just a dream, you know...
[Cowboy Bebop]

Ja bym dal zmienna

AllowClose: Boolean;

i w OnCreate Formy
AllowClose:=False;

w OnClick Buttona Zamknij
AllowClose:=True;
Form1.Close;

w OnCloseQuerry:
if not AllowClose then
begin
CanClose:=False;
Minimalizuj_Do_Traya;
end;
--Pawel {Delphi 6 Personal}

Po pierwsze: naciśnij F1