Forum: Sonstige Fragen zu Delphi
Delphi
by Reinhard Kern,
17. Jun 2009
Danke für die Belehrung, Rekursion habe ich schon mit Jensen und Wirth gelernt, das war so etwa vor 25-30 Jahren. Aber deine Beschreibung kann genausogut Grundlage eines iterativen Verfahrens sein, das siehst du bloss nicht.
Gruss Reinhard
Forum: Sonstige Fragen zu Delphi
Delphi
by Reinhard Kern,
17. Jun 2009
Vorschlag:
destructor TMyObjectList.Destroy; override;
var CurrentObject,NextObject : TMyObject;
begin
CurrentObject := FirstObject; { wie auch immer }
if Assigned (CurrentObject) then { könnte ja leer sein }
repeat
Forum: Sonstige Fragen zu Delphi
Delphi
by Reinhard Kern,
17. Jun 2009
Hallo,
dabei hast du eine iterative Lösung schon selbst fast erwähnt:
"... prüfe ob .Next existiert, wenn ja, erst FreeMakro (Anchor.Next) aufrufen
dann erst Aktuelles element freigeben "
Ich würde die Liste von vorne durchlaufen und immer zuerst Next zwischenspeichern, bevor das aktuelle Element freigegeben wird.
Gruss Reinhard
Forum: Sonstige Fragen zu Delphi
Delphi
by Reinhard Kern,
16. Jun 2009
Hallo,
Rekursion ist sehr beliebt bei Lehrern, ist elegant zu formulieren und man kann mit seinen Kenntnissen angeben, aber in der Praxis ist Rekursion fast immer Mist: wenn du 5000 Objekte hast, hast du 5000 ineinander verschachtelte Prozeduren. Das ist nicht nur völlig überflüssig, sondern auch nicht besonders gut zu debuggen.
Gruss Reinhard