Zitat:
Delphi-Quellcode:
procedure TStack.push(data : integer);
var
node : PStackItem;
begin
node^.xxx
Wer hat denn der Variable "node" einen Wert zugewiesen, bevor damit was gemacht wird?
Also, das Objekt in "node" wurde nicht erstellt.
und
:= nil;
gibt keine Objekte frei.
PS: Welche Delphi-/Lazarus-Version nutzt du denn?