Sprawa jest denerwująca, ale prosta w rozwiązaniu – wystarczy, aby OnClose wyglądało tak:
1 2 3 4 5 6 7 |
procedure TformChild.FormClose(Sender: TObject; var Action: TCloseAction); begin Action := caFree; end; |
Dodam, że w mojej książce do Delphi napisane jest, że Microsoft uważa to za standardowe zachowanie, dobre ^_^
Autor: Iskar