Data zu Treeview hinzufügen ?

[Delphiturbo]

Zitat von mkinzler:

Node.Data := ListBox.Items[0];

So importieren wir immer die erste Zeile (den Link für google)
Man muss eine i-schleife in Spiel setzen

Delphi-Quellcode:

var node: TTreeNode;
i : Integer;
Begin
node:=TreeView1.Items.GetFirstNode;
  while node <> nil do
   begin
    if node.level = 1 then
    // Showmessage(node.Text);
    for i:= 0 to 3 do
    Showmessage(ListBox1.Items[i]);

     //Node.Data :=  ListBox1.Items[i]
    node := node.GetNext
  end;
End;