Zitat:
Delphi-Quellcode:
procedure TfrmMain.addNodeClick(Sender: TObject);
var Data: PTreeData;
Node: PVirtualNode;
begin
Node := VST.AddChild(nil);
Data := VST.GetNodeData(Node);
VST.AddChild(Node);
Data.Str := Edit1.Text;
end;
Wie wäre es, wenn Du die reihenfolge mal vertauschen würdest:
Also ERST die Data.eigenschaft des Nodes setzen und DANN den Node dem VSt zufügen.
Moin