ПаскальНаписать программу,которая будет раскрывать txt файл,отыскивать подходящий текст и устранять

Паскаль
Написать программку,которая будет открывать txt файл,разыскивать нужный текст и удалять его.После чего сохранит конфигурации.
Необходимо использовать цикл,т.к.поиск будет исполняться много раз!
txt файл великой,с великим количеством перехода на новейшую строчку.

Задать свой вопрос
1 ответ
Только в среде Pascal.ABC.Net !!!
Лучше писать результат не в тот же файл, а в иной: при составлении постоянных выражений без достаточного опыта можно просто ошибиться.

uses
  System.Text.RegularExpressions;

const
  CRLF = 1310;

var
  s, sbig: string;
  fin, fout: Text;

begin
  Assign(fin, 'MyIn.txt');
  Reset(fin);
  sbig := '';
  while not Eof(fin) do
  begin
    Readln(fin, s);
    sbig := sbig + s + CRLF
  end;
  Close(fin);
  пример - уладить подстроки, начиная с "http:" и до первого пробела,
  при этом снутри подстроки может повстречаться переход на новейшую строчку.
  Употребляется шаблон '\bhttp:\S+' - подробности: регулярные выражения
  sbig:=RegEx.Replace(sbig, '\bhttp:\S+', '', RegexOptions.Multiline);
  Assign(fout, 'MyOut.txt');
  Rewrite(fout);
  Write(fout, sbig);
  Close(fout);
  Writeln('Конец работы');
end.

Галина
Если будут препядствия с регулярными выражениями - пишите мне в Собственные сообщения.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт