Speichern von Binären Bäumen in einer Datei

[Sebastian92]

Delphi-Quellcode:

  TInformation = record
                   Name :String[20];
                 end;

  TInhalt = record
              Nummer      : Integer;
              Information : TInformation;
            end;

TInformation steht für eine beliebigen record. In diesem Programm habe ich als Platzhalter einen String.