Einzelnen Beitrag anzeigen

Benutzerbild von maximov
maximov

Registriert seit: 2. Okt 2003
Ort: Hamburg
548 Beiträge
 
Delphi 2005 Professional
 
#34

Re: Methode "Free" selbst implementieren (Assemble

  Alt 24. Feb 2005, 12:43
Zitat von VizeTE:
Zitat von maximov:
...Ich würde den einfach NIL setzen, als zeichen das er niemanden gehört.
mmm...dann muß ich aber den Ansatz verwerfen, daß Elemente die einer Liste hinzugefügt werden und keinen Owner haben automatisch Kinder dieser Liste werden.
Warum? Das bietet sich doch erstrecht an:
Delphi-Quellcode:
procedure liste.fügehinzu(element)
begin
  TuInListe(element);
  if element.besitzer = nil then
    element.besitzer = mirSelbst;
end;
oder so. Frage mich wo das problem liegt. Allerdings kenne ich deine implementierung auch nicht.
mâxîmôv.

{KDT}
  Mit Zitat antworten Zitat