Problem mit caNone, caMinimize bei Form.OnClose

[PeterPanino]

Zitat von Sir Rufo:

Versuche es mal mit TCloseAction.caMinimize

Bringt nichts, das Programm wird beendet statt minimiert:

Delphi-Quellcode:

procedure TformMain.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action := TCloseAction.caMinimize;
end;