Из ISO8859-1 в читабельный вид Делфи

[RikkiTan]

Доброго времени суток! Подскажите, пожалуйста, как программно перевести текст из кодировки ISO8859-1 в windows-1251 или любую другую кодировку с кириллицей. В label дан такой текст

Вы получили в подарок копию игры

А должен быть

Вы получили в подарок копию игры

[Stilet]

А Делфи какая?

[RikkiTan]

XE2. Приложение Firemonkey HD application

[Stilet]

Тогда можно попробовать так:

Label.Text:=TEncoding.GetEncoding(1251).GetString(BytesOf(s))

Где s:String содержащая тот текст.

[RikkiTan]

Не помогло*( Возможно я поспешил назвать исходную кодировку. Сайт http://www.artlebedev.ru/tools/decoder/ раскодируя текст

Вы получили в подарок копию игры

написал, что он раскодировал его из cp1252 в UFT-8. Ну, вообщем, как бы то ни было такой код тоже не сработал

procedure TFwork.Button7Click(Sender: TObject);
var
  s: UTF8String;
begin
  s := TEncoding.GetEncoding(CP_UTF8)
    .GetString
    (BytesOf('Вы получили в подарок копию игры'));
  memo1.Lines.Text:=s;

Как результат,в мемо вообще ничего не вывелось.
Потом я попробовал записать текст

Вы получили в подарок копию игры

в файл, а потом считать этот текст в memo

Memo1.Lines.LoadFromFile('C:\Приложение\Win32\Debug\12345.txt', TEncoding.GetEncoding(cp_UTF8));

В мемо вывелся исходный текст без каких-либо изменений.
Вообще, текст, который я раскодирую- это заголовок сообщения с почты. В заголовке сообщения указана такая строчка

Content-Transfer-Encoding: 7bit

Приму любые предложения, как еще можно раскодировать из cp1252 в utf8.)