Rechner fährt nicht mehr herunter

[meg91]

ich hab unter CloseQuery folgendes rein geschriben

Delphi-Quellcode:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  CanClose := False;
  Form1.Hide;
end;