Форум: "Основная";
Текущий архив: 2004.06.27;
Скачать: [xml.tar.bz2];

Вниз

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

← →
Mike   (2004-06-09 20:39) [0]

Добрый вечер.Подскажите пожалуйста как менять строки в текстовом файле
element 01
element 02
element 03
element 04
element 05
Например element 02 на element 07
Спасибо.

---

← →
Palladin ©   (2004-06-09 20:42) [1]

Readln/Writeln

---

← →
Anatoly Podgoretsky ©   (2004-06-09 20:44) [2]

Или читать весь файл в память и потом обратно или два файла - старый и новый, если же длина строки не меняется то работать как с нетипизированным файлом.

---

← →
begin...end ©   (2004-06-09 20:52) [3]

ИМХО, можно использовать TStringList:
LoadFromFile, IndexOf, Strings, SaveToFile

---

← →
SergP ©   (2004-06-09 20:54) [4]

В некоторых случаях можно и так:

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;

---

← →
SergP ©   (2004-06-09 20:55) [5]

В некоторых случаях можно и так:

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 строки... Я вроде сначала так проблему понял...

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2004.06.27;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.03 c