Как лучше (надежнее) удалить узел из TreeView?

[artemavd]

Добрый вечер! Мне нужно удалить из дерева узел, название которого совпадает с тем, что введено в sEdit1.Text. Код удаляет узел нормально, но потом выдает ошибку "Invalid index". Вот код:

 for i := 0 to Form1.tv1.Items.Count - 1 do
   begin
     if Form1.tv1.Items[i].Text = sEdit1.Text then
     begin
       Form1.tv1.Items[i].Delete;
     end;
   end;

Суть задачки: в дерево добавляется узел, проверяется некое условие. Если оно нарушается, то выполняется код выше и узел должен удалиться. Правильно ли я выполняю удаление?

[Аватар]

Если только один узел удалить, то сразу после удаления выйти из цикла (например Break). Если все узлы с таким текстом удалить, то цикл делать for i := Form1.tv1.Items.Count - 1 downto 0 do

[artemavd]

Надо удалить только один узел. Ща попробую с Break.

Добавлено:
Спасибо, Аватар! Все сработало как надо