Neuer Titel, Altes Prob: Mein Binärbaum

[Binärbaum]

Zitat von Feechan:

ja ich weiß aber wie soll ich das sonst machen?
Die deklarationen hat mein info-lehrer vorgegeben, hat der sich vertan oder geht das?

Vielleicht geht das. Aber ich würde - wenn ich die freie Wahl hätte- das anders lösen.
Man könnte die Deklaration so ändern:

Delphi-Quellcode:

type PBinTree = ^TBinTree;
     TBinTree = record
                 left, right: PBinTree;
                 value: string;
     end;

Demzufolge würde ich die Funktionen für Einfügen usw. seperat schreiben, ohne Klassen zu verwenden. Dann kann man rekursiv auf dem Baum traversieren. Ist meines Erachtens nach einfacher zu implementieren, wenn auch nicht so schön wie mit Klassen.

MfG
Binärbaum