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

Вниз

Найти и заменить (работа с текстом)   Найти похожие ветки 

← →
Vidkart   (2006-04-26 18:13) [0]

у меня есть КУСОК текста
есть текстовый файл с большим текстом
ну вот мне надо найти  в текстовом файле кусок текста определённый (это я могу)
и заменить его на новый (а это не знаю как)

---

← →
Gydvin ©   (2006-04-26 18:32) [1]

procedure TForm1.Button1Click(Sender: TObject);
var
s,s1,s2:string;
begin
 s:="mama";    //исходный текстж
  s1:="a";   // заменяемый текст
 s2:="s";    // которым заменяется
 s:=stringreplace(s,s1,s2,[rfReplaceAll]);
 showmessage(s);
end;

---

← →
Poruchik   (2006-04-26 18:46) [2]

мне надо сделать это всё  внутри текстового файла (скажем 1.txt);
а текст оч большой и при присваивании его переменной приложение виснит

---

← →
menart ©   (2006-04-26 20:16) [3]

Читай по строчкам

---

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

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

Наверх

Память: 0.44 MB
Время: 0.009 c