free erzeugt Fehler

[daywalker9]

Free prüft auch ob die Klasse <> NIL ist

[Björn Ole]

Ja, Free setzt aber nichts auf nil.

Mir ist aber gerade aufgefallen, dass das gar nichts mit dem Problem zu tun hat.

[daywalker9]

Ging ja auch nur um das assigned()..

[fui-tak]

Eure Vorschläge funktionieren alle leider nicht:

Erster Versuch:

Delphi-Quellcode:

for i := 0 to high(levels) do
  if Assigned(levels[i]) then
     FreeAndNil(levels[i]);

Dieser Code gibt zwar keinen Fehler aus, aber die Schleife wird auch nur einmal durchgegangen

Delphi-Quellcode:

for i := high(levels) to  low(levels) do
  levels[i].free;

Hier gibt's dann wieder einen Fehler

Delphi-Quellcode:

for i := high(levels) downto  low(levels) do
  levels[i].free;

[daywalker9]

Ansonsten bastel dir eine Assign Methode, um alle Eigenschaften in das Level zu kopieren. Dann kannst du diese Klassen so freigeben. Beispiel:

Delphi-Quellcode:

level[0]:=TLevel.create;
level[0].Assign(level[1]);


procedure TLevel.Assign(ASOurce:TPersistent);
begin if (ASource is TLevel) then
         Self.Name := (ASOurce as TLevel).Name; //für alle attribute machen
      else 
         inherited Assign(ASOurce);
end;

Du musst dann TLevel von TPersistent ableiten

[xZise]

Moin,
naja der Fehler ist ja klar: Es wird vorher schon bereits ein weiter hinten liegendes Element gelöscht. Da hilft dann FreeAndNil() auch wenig, da nicht der hinten liegende Zeiger genilt wird (oder liege ich da falsch).

Deshalb würde ich in diesem Fall echt assign verwenden!

MfG
Fabian

[DeddyH]

Eine andere Möglichkeit sehe ich auch nicht, da level[3] ja nicht mitbekommt, wenn level[1] freigegeben wird, egal ob mit Free oder FreeAndNil. Ansonsten müsste man ja irgendwo hinterlegen, wo überall gleiche Instanzverweise existieren und diese dann beim Freigeben alle nullen, aber das halte ich für ein sehr gefährliches und fehleranfälliges Unterfangen.

[himitsu]

Der Spruch "Es kann nur Einen geben", trifft halt an vielen Stellen zu.

Wenn du über das Array die Objekte freigeben willst, dann ist das Array, bzw. sind die einzelnen Felder quasi der Owner ihrer zugeordneten Objekte.
Tja, und bei Objekten darf es halt nur einen Besitzer geben, welcher für die Freigabe zuständig ist, es sei denn die anderen "owner" werden beim Löschen benachrichtigt, daß das gelöschte Objekt nun weg ist und sie es aus ihrer Liste entfernen sollen.

[mkinzler]

Eine Objektliste kann Eigentümer der Objekte sein, aber ein Array?