Hai Sharky,
Zitat von
Hansa:
Delphi-Quellcode:
frm := TFrm.Create(self);
procedure Tfrm.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
Action := caFree;
end;
Wohl übersehen ? Wenn es noch kürzer/kompakter gehen sollte, dann sage wie. Da ist kein if und wenn und aber. 8) Alles wird im OnCreate geregelt. Die Freigabe übernimmt komplett Delphi.