Einzelnen Beitrag anzeigen

direktor

Registriert seit: 5. Apr 2014
22 Beiträge
 
#16

AW: replace string with spaces?

  Alt 20. Jan 2020, 03:34
DieDolly was using ANSI INI file. I have UTF-8 file. Here is one solution.

SS := TStringStream.Create('', TEncoding.UTF8);
SS.LoadFromFile(ParamStr1);

S := StringReplace(SS.DataString, 'Å', 'A', [rfReplaceAll]);

SS2 := TStringStream.Create(S, TEncoding.UTF8);
SS2.SaveToFile(ParamStr2);

SS2.Free;
SS.Free;
  Mit Zitat antworten Zitat