Okay ich hab die Lösung...
Delphi-Quellcode:
Node := frmMain.lvObjects.Items[0];
While ( Node <> Nil )
Do Begin
If ( Node.Text = cbGruppe.Text ) Then Break;
Node := Node.GetNextSibling; // holt den Verwandten auf der gleichen Ebene
End;
If ( Assigned(Node) ) Then frmMain.lvObjects.Items.AddChild(Node, edBezeichnung.Text);
Gruß,