No cerrar la ventana cuando le doy click al boton de la barra de titulo

[lostprophets]

es posible hacer un codigo que no cierre la ventana cuando le doy click a la "X" que esta en la barra de titulo?, quisiera que no se cerrara y realizara esta acción:
CoolTrayIcon1.HideMainForm;

tengo este codigo pero no me funciona:

Código Delphi [-]
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
if cerrar=true then
close
else
CoolTrayIcon1.HideMainForm;
end;