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.