Minimize on close?

[DeddyH]

Do you want to minimize or to hide your form? Here' s an example for hiding:

Delphi-Quellcode:

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  if CheckBox1.Checked then
    begin
      Action := caNone;
      self.Hide;
    end;
end;

But beware that your form is not visible anymore so that the user cannot close it anytime. For this be sure to give him the possibility to reach your application (e.g. by a hotkey or an icon in the TNA).