Hi
zu CenBells Lösung noch zwei Sachen
irgendwo mußt du noch die NodeSize definieren (z.B.: FormCreate)
DeinBaum.NodeDataSize := sizeof(TDeinRecord );
und folgendes
Delphi-Quellcode:
LNode := DeinBaum.AddChild(AParentNode);
LData := DeinBaum.getNodeData(LNode);
TObject(LData^) := LRec;
müßte auch mit foglendem funktionieren
LNode := DeinBaum.AddChild(AParentNode, LRec);
ach ja, freigeben mußt du die Klassen auch wieder mal z.B.: im OnFreeNode
TDeineRecord(Sender.GetNodeData(Node)^).Free;
Gruss
Hans