treeview получить список узлов одного уровня

[MetR]

мне нужно заполнить combobox на второй форме из treeview на первой форме, пробовал сделать так, но вылетает ошибка "invalid index". Программа все таки компилируется но комбобокс не заполняется, что не так?

n:=form1.tvGroup.Items.Count;
form2.cbSubGroup.Text:=inttostr(n);
if n<>0 then
   begin
     form1.tvGroup.items.Item[0].Selected;
     n:=form1.tvGroup.Selected.Index;
     s:=form1.tvGroup.Items.item[n].text;
     form2.cbGroup.Items.Add(s);
        repeat
        form1.tvGroup.Items.Item[n].getNextSibling.Selected;
        n:=form1.tvGroup.Selected.Index;
        s:=form1.tvGroup.Items.item[n].text;
        form2.cbGroup.Items.Add(s);
        until form1.tvGroup.Items=nil;
   end;