Поиск по текстовому файлу

[LeBron]

Сообщение от Alex Cones

Потому и делаем дублирование:
1) Копируем содержимое файла в Peremennaya1
2) Pos`ом ищем первое попадание
3) Копируем эту строку\слово туда, куда надо
4) Удаляем в Peremennay1 эту строку
5) Идем на шаг 2, пока пос не покажет "0".

А чтоб искал только с начала следующей строки - Можно попробовать Pos(#13+'Ша',S);

Не самый оптимальный способ, но подойдет Если руками прописывать, то выбросить удаление (из всего описанного - самый "тормознутый" процесс) и остальное можно оставить. Но возражений от топикстартера нету, значит все ОК.