Einzelnen Beitrag anzeigen

Teesäufer

Registriert seit: 10. Jan 2021
12 Beiträge
 
#1

Destruktor für verkettete Liste

  Alt 10. Jan 2021, 21:10
Hallo zusammen,

ich bin mit Delphi leider noch nicht so ganz warm geworden. Als ich mir mal ein gutes Buch dazu kaufen wollte waren die alle nicht mehr im Handel. Keine Ahnung, warum.

Auf jeden Fall möchte ich eine verkettete Liste programmieren.

Delphi-Quellcode:
TListe = class
    private
    inhalt: string;
    next: Tliste;
    public
    constructor create(wert: string);
    destructor destroy; override;
    function gibmirinhalt: string;

  end;
Mit dem Destruktor habe ich noch meine Probleme. So sieht er momentan aus:
Delphi-Quellcode:
destructor TListe.destroy;
var loeschzeiger: TListe;
begin
  if next<>nil then
    next.destroy;
  inherited;


end;
Wenn ich das im Debugger verfolge stelle ich aber fest, dass nach dem Destroy die Elemente aber noch vorhanden sind. Was mache ich falsch?

Geändert von mkinzler (10. Jan 2021 um 21:16 Uhr) Grund: Delphi-Tags eingefügt
  Mit Zitat antworten Zitat