[Lazarus] StringReplace loses non-ASCII characters in FPC 3.1.1

[Ondrej Pokorny]

I found it:

http://forum.lazarus.freepascal.org/index.php?topic=27034.0

   SetMultiByteConversionCodePage(CP_UTF8);
   SetMultiByteRTLFileSystemCodePage(CP_UTF8);

helped.

Sorry for not finding it before.
Ondrej