TTreeNode aussuchen u. weitere Knoten anhängen

[Mazel]

Hallo,

weist du genau wo du diese Anhängen willst, oder ist das nicht statisch festgelegt? Wenn doch geht es so hier:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  TreeView1.Items.AddChild(TreeView1.Items[1], 'Ebene3Knoten1');  //Ebene1 ist Item 0
  TreeView1.Items.AddChild(TreeView1.Items[1], 'Ebene3Knoten2');
  TreeView1.Items.AddChild(TreeView1.Items[4], 'Ebene3Knoten3');  //Knoten2 ist Item 4, da 2 neue
  TreeView1.Items.AddChild(TreeView1.Items[4], 'Ebene3Knoten4');
end;

Im Anhang habe ich noch das dazugehörende Beispielprojekt, was dir eventuell helfen könnte.

Gruß
Mazel