[ROLF]

Вопрос такой существует текстовый файл text.txt в нем набран текст вот нужно сделать поиск по этому тексту например найти "_O_" по всему тексту и заменить на другое слово, как это реализовать?

[dr. F.I.N.]

Код:

var
  S: TstringList;
  st: String;
begin
  S := TStringList.Create;
  S.LoadFromFile('<FileName>');
  S.Text := StringReplace(S.Text, '_O_', '<NewText>', [rfReplaceAll, rfIgnoreCase]);
  S.SaveToFile('<FileName>');
  S.Free;
end;

[ROLF]

Спасибо большое )