zugriffsverletzung bei aufruf von destroy

[marabu]

Hallo Martin,

so geht es jetzt:

Delphi-Quellcode:

procedure TLitForm.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  with Owner as TDataModule do
  begin
    RemoveComponent(self);
    Free;
  end;
  Action := caFree;
end;

marabu