TreeView, различное обращение к ITEM

[Winexcel]

Сканирую нет ли такого задания в списке, если нет то:Добавляю задание в дерево, добавляю в задание подэлементы(описание), затем, если задание есть то изменяю уже текущее:

var
Node:TTreeNode;
i:integer;
ends:boolean;
begin

ends:=false;

for i:=0 to TreeJob.Items.Count-1 do
begin
  if TreeJob.Items[i].Text=TEXT.Lines[0] then begin

    node:=TreeJob.Items[i];



    if TreeJob.Items[i+1].Parent[0]<>nil then
      TreeJob.Items[i+1].Parent[0].Text:='MODE:'+MODE.Text
    else
      TreeJob.Items.AddChild(Node,'MODE:'+MODE.Text);

   ...так овер 100500 раз пока не кончатся пункты

    ends:=true;
    break;
  end;
end;

if ends then exit;//выход если есть задание в списке, мы его уже изменили, всё гуд.

//если нет то добавляем его:

Node:=TreeJob.Items.Add(TreeJob.Selected,TEXT.Lines[0]);
TreeJob.Items.AddChild(Node,'MODE:'+MODE.Text);
//овер 100500 подпунктов(addchild)

Вопрос, почему обрашение к объекту возможно только при

i+1

А сам объект(задание) находит по адресу

i

И правильно ли я юзаю следующий поиск и замену. Если нет то скажите как лучше.