Http.Get, Парсинг UTF8, знак - отображается как ? Как декодировать?

[XerSon]

Всем привет,

Не как не получилось 100% перекодировать UTF8?
Вместо знака - отображаеться знак ? со знаком + все ок!

Код прилагаю ниже, подскажте уважаемые, что не так?
D2009, Indy 10.2.5, Console.

{$APPTYPE CONSOLE}

uses
  Windows,
  Classes,
  SysUtils,
  StrUtils,
  IdHTTP;

var
  i, a1, b1, a, b, a2, b2: integer;
  http: TIdHTTP;
  ms: TMemoryStream;
  s, ss, day: string;
  date, temp2, temp4, desc2, desc4, wind2, wind4: string;
  page: TStringlist;

begin
  page := TStringList.Create;
  http := TIdHTTP.Create(nil);
  ms := TMemoryStream.Create;
  try
    http.Get('http://pogoda.yandex.ru/moscow/details/', ms);
    ms.Position := 0;
    page.LoadFromStream(ms);
    page.Text := UTF8Decode(page.Text); // тут баг
    AnsiToUtf8(page.Text); // тут тоже
  except
    WriteLn(Ru('Ошибка. Возможно неверно введен город'));
  end;
  try
  finally
    ms.Free;
    http.Free;
  end;
  s := page.Text;
...

[XerSon]

Похоже решения нет?

[Mifody]

лови, думаю сам разберешся что и как

[XerSon]

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

лови, думаю сам разберешся что и как

Эффекта 0

Страничка точно в UTF8
данные отображаются так:
-6…-5
а выводятся так апосля преобразования:
?6…?5

Что может еще быть не так?

[Mifody]

адрес на страничку

[XerSon]

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

адрес на страничку

в первом посте, http://pogoda.yandex.ru/moscow/details/

[XerSon]

<span>13…−12</span>

знак минуса блатной − а вот простой -

и тут пришло на ум сие:

temp4 := StringReplace(temp4, '−', '-',
      [rfReplaceAll, rfIgnoreCase]);

Теперь все ок! Но это не решило баг, у меня в голове)