Binärer Baum mit Klasse

[mkinzler]

Eine Klassenvariable ist schon eine Referenz (Zeiger) es gibt keine Notwendigkeit einen extra Zeiger zu deklarieren.
Man fordert hierfür auch keinen Speicher an, sondern macht das implizit durch Instantiieren.

Delphi-Quellcode:

TNode = class;

TNode = class
    private
      FDaten: String;
      FLinks: TNode;
      FRechts: TNode;
      FTreeNode: TTreeNode;
    public
      constructor Create;
  end;

Delphi-Quellcode:

  CurrentNode := TNode.Create; //Neuer Node erzeugen

  CurrentNode.FDaten := eingabe;
  CurrentNode.FLinks := nil;
  CurrentNode.FRechts := nil;