Muß mal kurz nachhaken. Habe sowas :
Delphi-Quellcode:
frm1 := Tfrm1.Create(Self);
ModalResult := frm1.ShowModal;
case ModalResult of
mrOk : begin
frm2 := Tfrm2.Create(Self);
case frm2.ShowModal of
mrOk : CanClose := true;
mrAbort,
mrCancel : CanClose := false;
end;
end;
mrAbort : CanClose := false;
mrCancel : CanClose := true;
end;
Also erstmal eine Form. Je nach Anforderung wird noch eine angezeigt. Und dann bei bestimmten Aktionen noch eine. Im geposteten Code sehe ich jetzt viel finally, free und solche Sachen. Ich habe in allen FormClose allerdings
Action := caFree;
drin stehen. Ist es dann überhaupt notwendig Free usw. explizit zu benutzen ?