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

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

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

строки [D7, Win2k]

Mike © (2004-06-09 20:39:00)
Добрый вечер.Подскажите пожалуйста как менять строки в текстовом файле
element 01
element 02
element 03
element 04
element 05
Например element 02 на element 07
Спасибо.

SergP (2004-06-09 20:55:00) [1]
В некоторых случаях можно и так:

var
a:string;
begin
with TStringList.Create do
try
LoadFromFile('filename.txt');
a:=Strings[1];
strings[1]:=strings[6];
strings[6]:=a;
SaveToFile('filename.txt');
finally
Free;
end;
end;

Правда это поменяет местами 2 и 7 строки... Я вроде сначала так проблему понял...

SergP (2004-06-09 20:54:00) [2]
В некоторых случаях можно и так:

var
a:string;
begin
with TStringList.Create do
try
LoadFromFile('filename.txt');
a:=Strings[1];
strings[1]:=strings[6];
strings[6]:=a;
SaveToFile('filename.txt');
finally
Free;
end;
end;

begin...end (2004-06-09 20:52:00) [3]
ИМХО, можно использовать TStringList:
LoadFromFile, IndexOf, Strings, SaveToFile

Anatoly Podgoretsky (2004-06-09 20:44:00) [4]
Или читать весь файл в память и потом обратно или два файла - старый и новый, если же длина строки не меняется то работать как с нетипизированным файлом.

Palladin (2004-06-09 20:42:00) [5]
Readln/Writeln

Наверх

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