Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TStringList [D7, XP]


Sw ©   (2013-09-11 07:58:00) 

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 перевод строки добавляется, не понимаю..можно ли этого избежать?


[ВладОшин]   (2013-09-11 08:29:00) [1]

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

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


Anatoly Podgoretsky   (2013-09-11 08:24:00) [2]

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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо