Hai Tobiax,
eigentlich ist es ganz einfach. Du musst beim anlegen eines Nodes angeben wer sein Parent ist. Wenn es ein neuer Root-Eintrag sein soll dann ist der Parent einfach
nil.
Dieser Code fügt entweder beim markierten Node einen neuen Untereintrag ein oder einen neuen Root-Eintrag:
Delphi-Quellcode:
// Neuer Eintrag unter markierten Node
procedure TDemo_Form.btn_AddToNodeClick(Sender: TObject);
var
CurrentNode: TTreeNode;
NewNode: TTreeNode;
begin
CurrentNode := TreeView1.Selected;
NewNode := TreeView1.Items.AddChild(CurrentNode, Edit1.Text);
end;
// Neuer Rooteintrag
procedure TDemo_Form.btn_AddToRootClick(Sender: TObject);
var
NewNode: TTreeNode;
begin
NewNode := TreeView1.Items.Add(NIL, Edit1.Text);
end;