[Alegun]

А если так

Код:

function GetUTF8Page(URL: String): AnsiString;
var
  st: TStream;
  IdHTTP: TIdHTTP;
begin
  IdHTTP:= TIdHTTP.Create(Nil);
  st:= TMemoryStream.Create;
  try
    IdHTTP.Get(URL, st);
    st.Position:= 0;
    SetLength(Result, st.Size);
    st.Read(Result[1], st.Size);
    Result:= UTF8ToString(Result);
  finally
    st.Free;
    IdHTTP.Free;
  end;
end;

наверное CP1252 а надо UTF-8