Показать сообщение отдельно
  #2  
Старый 17.08.2009, 17:18
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,105
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Вариант первый - делать в 2 прохода. В первый проход находишь индексы элементов = 0, во второй проход - удаляешь.
Вариант второй - использовать цикл While. При удалении элемента - не увеличивать счетчик, что бы по этому элементу "пройтись" еще раз.
Ответить с цитированием