Probleme mit Fenster

[Tim Henford]

Hallo,

Ich habe ein Hauptfenster, indem ich ein Unterfenster folgendermaßen erstelle:

Delphi-Quellcode:

procedure TForm1.HistoryBtnClick(Sender: TObject);
begin
  if not Assigned (History) then begin
    History:= THistory.Create(nil);
    History.Show;
  end else
    History.Close;
end;

Das History Fenster hat nur diese Funktion on ein onShow Ereigniss:

Delphi-Quellcode:

procedure THistory.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  FreeAndNil (History);
end;

Nach 3x Button klicken, kommt plötzlich ein Fehler, was mach ich hier falsch?

[OregonGhost]

Was denn für ein Fehler?

Edit: Nehme die zweite Frage zurück. Darf man in Delphi ein Objekt in dessen Ereignishandler freigeben?

[Tim Henford]

Danke.
"Access Violation in module borlndmm.dll"
Scheint dann wohl eher an dem DB-Zugriff zu liegen, den ich mache? Ich check das nochmal.

[mkinzler]

Wenn man die Referenz nicht auf Nil setzt: ja.

[Tim Henford]

@mkinzler:
wie meinst du das mit der Referenz?

[xZise]

Sind den beide "History" Variablen die gleichen?

MfG
xZise

[Tim Henford]

ja sind die gleichen, wurden ja automatisch beim erstellen der Form generiert

Delphi-Quellcode:

var
  History: THistory;

implementation
...

[mkinzler]

Mit Referenz meine die Variable History
Vielleicht existieren auch mehrere Variablen mit dieser Bezeichnung

[Tim Henford]

stimmt. danke euch- da gabs problem.