Работа с UTF-8 кодировкой

[Levsha100]

Привет.
Ребят, совсем запарился с кодировками, нужно в Delphi 2010 сделать вот что:
Прочитать файл в строку(кодировка UTF-8), сделать замену подстроки и снова записать в файл. Проблема в том, что у меня на каком-то этапе меняется кодировка и я не знаю как это исправить.
Вот мой код:

b:utf8String;


  Memo.Lines.LoadFromFile('Templates\temp.xml');
  b := Memo.Text;
  b:=StringReplace(b, UTF8Encode('PL1'),UTF8Encode('ТЕСТ'),[]);
  Memo.Text:= b;
  Memo.Lines.SaveToFile('Templates\temp.xml');

[BDA]

А если попробовать stringlist вместо memo?
UPD
Превращается в ansi все равно.
UPD2
Аватар уже написал.

var
  s1, s2: tstringstream;
  s: string;
begin
  s1 := tstringstream.Create('', TEncoding.UTF8);
  s1.LoadFromFile('1.txt');
  s := StringReplace(s1.DataString, UTF8Encode('PL1'), UTF8Encode('ТЕСТ'), []);
  s2 := tstringstream.Create(s, TEncoding.UTF8);
  s2.SaveToFile('2.txt');
  s1.Free;
  s2.Free;
end;

[Levsha100]

На сколько я понимаю мемо агрегирует стринглист, но сейчас попробую.
Попробовал, не работает.

[Аватар]

Через TStringStream c TEncoding.UTF8

[Levsha100]

Спасибо, работает

[IvaniuS]

все хорошо, все работает и работало, НО у меня шифрованый файл и там есть половина символов "левых" а мне нужен только текст англ и рус + @ + > +< + "
мне нужно или все лишнее удалить или наоборот перенести только нужное, проблема в том что англ текст нормальный а русский в другой кодировке, ворд и нотепад++ нормально перекодируют, а если подсунуть весь текст делфе он оставит только 2 строчки куска зашифрованого файла.

  for I := 0 to crttext.Lines.Count - 1 do
    for j := 0 to length(crttext.Lines[i]) - 1 do
      crttext.Lines[i][j]:=utf8toansi(crttext.Lines[i][j]);

вот так вот пробовал, но безуспешно, там только строка должна быть символ не катит.
как-то побайто-во можно, но не знаю как.
во вложении как это выглядит в нотепад++

[ReportCube]

Странная зашифровка файла, который легко читается в utf-8: "Юг-Інтелект-Сервіс" для податкових накладних. Судя по всему - обычное хранение переменных и их свойств. Пытаетесь взломать и переписать?

[northener]

Сообщение от IvaniuS

НО у меня шифрованый файл и там есть половина символов "левых" а мне нужен только текст англ и рус + @ + > +< + "
мне нужно или все лишнее удалить или наоборот перенести только нужное

ЭЦП хотите подделать?