Цитата ChVL:
Неплохо бы в этом случае и строку убрать »
|
Тогда вам проще использовать в процедуре RePlaceTextinFile не TArrayOfString, а TStringList и уже в нём удалять нужную строку.
P.S.
В процедуре RePlaceTextinFile после того как нашли строку, я бы добавил Break, чтоб не бегать дальше по оставшимся строкам.