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?