Neuer Titel, Altes Prob: Mein Binärbaum

[Binärbaum]

Zitat von Feechan:

meinst du damit, ich soll in der prozedur noch eine variable vom typ TBintreenode (var wurzel:Tbintreenode) deklarieren und dann bsp: Wurzel:=root?
oder wurzel:=tbintree.root?

Eigentlich von Typ TBinTree (denn dort ist ja root). Also etwa so:

Delphi-Quellcode:

procedure tbintreenode.insertLeft(l:tbintreenode; var Tree: TBinTree);
var neuerknoten,tl:tbintreenode;
begin
neuerknoten:=l;

if neuerknoten.value=tree.root.value then begin

end;
end;

Das müsste dann funktionieren. Tree muss natürlich der zugehörige TBinTree sein.