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

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

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

Найти текст и заменить его [D7, XP]

Страницы: < 1 2
Gex88 © (2006-11-15 12:39:00)
Добрый день ! Подскажите пожалуйста как открыть текстовый файл и программно найти текст и заменить его на другой текст. Подкиньте плииз функцию.

Gex88 (2006-11-15 13:14:00) [21]
Теперь вроде бы начинаю врубаться..

> Или тебе уже готовый код, открытия, замены и сохранения?

Не помешал бы, если это возможно.

Anatoly Podgoretsky (2006-11-15 13:13:00) [22]
> KilkennyCat (15.11.2006 13:10:10) [10]

А вот за StringReplace подобного самовольства не замечено

KilkennyCat (2006-11-15 13:10:00) [23]
> [6] Gex88 (15.11.06 13:05)

если AText есть весь техт файла, то зачем еще что-то искать? Эта функция и находит, и заменяет, и возвращает готовый текст.
Единственный нюанс - заменены будут все нахождения.

Anatoly Podgoretsky (2006-11-15 13:07:00) [24]
StringReplace

Anatoly Podgoretsky (2006-11-15 13:07:00) [25]
Тупой?
Вопроса вообще нет, где то что ты уже сделал?
Или тебе уже готовый код, открытия, замены и сохранения?

Gex88 (2006-11-15 13:06:00) [26]
> Может не стоит искать, а сразу заменять?

Подскажите как это сделать ....

Gex88 (2006-11-15 13:05:00) [27]
Насколько я понимаю "AnsiReplaceText" возвращающая строку которая является результатом замены строки AFromText найденная в AText, строкой AToText... А как ее теперь искать в определеннов файле?
понимаю вопрос тупой по этому в конференции начинающим))...

Anatoly Podgoretsky (2006-11-15 13:03:00) [28]
> Gex88 (15.11.2006 12:39:00) [0]

Может не стоит искать, а сразу заменять?

Jeer (2006-11-15 12:49:00) [29]
Вот так и работает:

procedure TextFileOpenReplaceSave()
begin
AssignFile(F, '')
Reset..
Read..
Close..
// и
AnsiReplaceText(const AText: string; const AFromText: string; const AToText: string): string;

end;

KilkennyCat (2006-11-15 12:45:00) [30]
AssignFile(F, '')
Reset
Read
Close
и
function AnsiReplaceText(const AText: string; const AFromText: string; const AToText: string): string;

Gex88 (2006-11-15 12:45:00) [31]
> TextFileOpenReplaceSave();

А как это работает ?

Percent (2006-11-15 12:43:00) [32]
TextFileOpenReplaceSave();

Страницы: < 1 2

Наверх

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