VST Node mit Child Nodes hinzufügen (InitChildren)

[Wishmaster]

versuche es mal mit, ich hoffe es hilft.

Delphi-Quellcode:

(* Init Tree  DataSize *)

procedure TForm.FormCreate(Sender: TObject);
begin
  VST.NodeDataSize:= SizeOf(TData); // Ich initialisere Nodes so ;-)

erster eintrag/node

Delphi-Quellcode:

 Node:= VST.AddChild(Nil);
 Data:= VST.GetNodeData(Node);
 Data^.Text:= 'Test'

subnode

Delphi-Quellcode:

  Node:= VST.FocusedNode;
 if Assigned(Node) then
  begin
    Node:= VST.AddChild(Node);
    Data:= VST.GetNodeData(Node);
    Data^.Text:= 'Test'
    Data^.Caption:= 'Test'
  end;

schaue dir auch mal an die folgenden, besonders wenn du daten in einem loop verarbeiten willst.
GetFirst, GetLast, NextSibling,
FirstChild, LastChild
GetFirstLevel,

[DieDolly]

Danke für die Hilfe aber VST.AddChild(Nil); verwende ich nicht, da ich Daten von Design trenne.

[Wishmaster]

was genau versuchst du zu machen, kannst du mir eventuell ne demo schicken?

[DieDolly]

Ich möchte ganz normal Childnodes unter einem Hauptnode anzeigen (mehrere im Level 1 unter dem Hauptnode mit Level 0).