Warum hat FormClose einen Parameter ?
Delphi-Quellcode:
procedure Tfrm.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
inherited;
Action := caFree;
end;
So sieht das normalerweise aus. Alles andere ist überflüssig. Bei kleineren Programmen ohne
OOP auch das inherited. FreeAndNil-Orgien besorgt Delphi automatisch.
