Zitat von
omata:
Fenster werden nicht mit Free sondern mit Release freigegeben!
Weder, noch.
Delphi-Quellcode:
procedure Tfrm.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
end;
Und bei 181 Forms würde ich mir mal dringend die Funktionsweise der Form-Inheritance ansehen, oder soll diese Zeile 181mal überall von Hand eingefügt werden ?
