Zeile 10+11:
Delphi-Quellcode:
Daten:= TMSV1.Create;
Daten:= MSBez;
verursacht, dass für jeden Knoten das gleiche Objekt angehängt wird. Dabei wird ja nur der Pointer gesetzt, d.h. wenn du in der Instanz des Objektes ein Attribut änderst, so wird das in allen Knoten eben genauso wiedergespiegelt.