Free-Methode

[hackepjotre]

Hallo,

ich hab in meinem Programm zuerst ein TPanel während der Laufzeit erstellt...

otab[1].box := tpanel.Create(otab[1].box); später hab ich es mit der free-methode gelöscht:

otab[1].box.Free; wenn dann in dem gleichen programm wieder das Panel erstellen will kommt ein Fehler

otab[1].box := tpanel.Create(otab[1].box); Fehler: "Im Project1.exe ist eine Exception der Klasse EAbstractError aufgetreten. Meldung Abstrakter Fehler"

Weiss jemand woran das liegt?

Schöne Grüße
Adrian Klinger

[jfheins]

Versuche mal FreeAndNil(otab[1].box) statt otab[1].box.Free; ...

Aber wieso übergibst du em Panel im Konstruktor eigentlich die Variable, der es zugewiesen wird? Wenn da nichts sinnvolles drinsteht wird es natürlich krachen

[hackepjotre]

Was müsste man denn da rein schreiben? Den Parent von dem TPanel?

[jfheins]

Du kannst Form1 da rein schreiben. Du übergibst den Owener, der sich darum kümmert, dass das Objekt am Ende der Laufzeit freigegeben wird.

Wenn du kein Form hast, übergib einfach nil

[hackepjotre]

ok dankeschön

[generic]

Das Problem ist eigendlich ein anderes.

otab[1].box ist beim start nil
also ist bei erzeugen des Paneles der Owner auch nil (s.h. Create Parameter)
Gibts du nun das Panel frei, ist der Zeiger in otab[1].box ungültig.

Wenn du nun ein neues Panel erzeugst, ist der Owner ein freigegebenes Panel.
Was natürlich nicht geht.

Übergib beim Create immer NIL oder das Form.
Bei NIL musst du dich selbst um das Freigeben kümmern.