TStringList

← →
Sw (2013-09-11 07:58) [0]

List:=TStringList.Create; List.LoadFromFile("D:\test.txt"); s:=List.Text; i:=Pos("зайка",s); Delete(s,i,5); Insert("зайка",s,i); List.Text:=s; List.SaveToFile("D:\test.txt");

Подскажите, пожалуйста, почему в текстовом файле добавляется пустая строка, т.е. например, в файле всего 4 строки, а после выполнения кода их 5, т.е. как бы при Insert перевод строки добавляется, не понимаю..можно ли этого избежать?

← →
Anatoly Podgoretsky © (2013-09-11 08:24) [1]

> Sw (11.09.2013 07:58:00) [0]

Строка заканчивается переводом строки.
И как насчет S.Count?

это
.SaveToFile - добавляет признак конца списка

проверь
List:=TStringList.Create;
List.LoadFromFile("D:\test.txt");
List.SaveToFile("D:\test.txt");

TStringList Найти похожие ветки