Einzelnen Beitrag anzeigen

Benutzerbild von Jazzman_Marburg
Jazzman_Marburg

Registriert seit: 2. Aug 2004
359 Beiträge
 
#1

FormClose erzeugt Exception - Washalb?

  Alt 1. Dez 2009, 19:51
Moin, Moin,

bin gerade auf folgendes (mir unverständliches) Phänomen gestoßen:
Auf der Main-Form wird mittels CheckBox eine neue Form geöffnet bzw. geschlossen:

Delphi-Quellcode:
  IF CheckBox1.Checked THEN Trace_Frm.Show;
  IF NOT CheckBox1.Checked THEN Trace_Frm.Close;
In dieser Trace_Frm wird auf das Ereignis Close eine Liste freigegeben (die zuvor erzeugt wurde):

Delphi-Quellcode:
procedure TTrace_Frm.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Trace_List.Free;
end;
Das Öffnen/Schliessen der Form funktioniert genau zweimal -- beim zweiten "unchecken" der CheckBox und dem Versuch die From zu schliessen wird eine Exception gefeuert: EInvalidPointer 'Ungültige Zeigeroperation'

Was stimmt mit meinem Öffnen/Schliessen Mechanismus nicht? Jemand eine Idee?

Dankeschön

Gruß
Jazzman
--- Delphi XE Starter, Windows 8 ---
  Mit Zitat antworten Zitat