Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

удалить опред. строчку из файла [D7, XP]

funky © (2006-10-21 23:58:00)
Уважаемые мастера. Подскажите пожалуйста, как удалить определённую строчку из файла? Т.Е. Есть фаил, в нём скажем 10 строчек, как мне удалить(ну или просто стереть) строчку скажем 5?
Скажем через TStringList?
Спасибо.

Германн (2006-10-22 02:41:00) [1]

> Dmitrij_K (22.10.06 00:08) [4]
>
> зы
> 5-ая строка sl.delete(4{***});
> <Цитата>
>
> Kolan © (22.10.06 00:19) [5]
>
> > [4] Dmitrij_K (22.10.06 00:08)
>
> Хм.. а ведь веро. :(
> <Цитата>
>
> Sam Stone © (22.10.06 00:25) [6]
>
> > зы
> > 5-ая строка sl.delete(4{***});
>
> позор на мою седую голову :(
> :D
>

А я вот вчера несколько раз переправлял в программе "4" на "5"! Всё время забывал, что имею дело с гридом :-(

Sam Stone (2006-10-22 00:25:00) [2]
> зы
> 5-ая строка sl.delete(4{***});

позор на мою седую голову :(
:D

Kolan (2006-10-22 00:19:00) [3]
> [4] Dmitrij_K (22.10.06 00:08)

Хм.. а ведь веро. :(

Dmitrij_K (2006-10-22 00:08:00) [4]
зы
5-ая строка sl.delete(4{***});

funky (2006-10-22 00:03:00) [5]
Kolan © (22.10.06 00:02) [1]
Пасиб %)

Sam Stone (2006-10-22 00:03:00) [6]
> Т.Е. Есть фаил, в нём скажем 10 строчек, как мне удалить(ну
> или просто стереть) строчку скажем 5?
> Скажем через TStringList?

var sl:TStringList;
...
sl.loadfromfile('маразм.txt');
sl.delete(5);
sl.savetofile('маразм.txt');

Kolan (2006-10-22 00:02:00) [7]
Strings := TStringList.Create; try Strings.LoadFromFile('C\t.txt'); Strings.Delete(5); Strings.SaveToFile('C\t.txt'); finally Strings.Free; end;

Наверх

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