Из Utf8 в Windows-1251 (HttpDownload->Get(Url))

void __fastcall TForm1::Give(String Start, String End, String Tsel, String Url)
{
int kolich=0;
int posS = 0;
int posE = 0;
int str_length = Edit1->Text.Length();
UnicodeString Text=HttpDownload->Get(Url);
TStringList *TagParts = new TStringList();
 
while (Text.Length() > 0) {
  posS=Text.Pos(String(Start).w_str());
  posE=Text.Pos(String(End).w_str());
  if (posS == 0 || posE == 0) {
    break;
  }
  TagParts->Add(Text.SubString(posS+str_length,posE-posS-str_length));
  Text = Text.SubString(posE+1,Text.Length()-posE);
}
 
for (int i = 0; i < TagParts->Count; i++) {
        int posF = TagParts->Strings[i].Pos(String(Tsel).w_str());
        if (posF != 0) {
        kolich+=1;
        StringGrid1->RowCount=kolich+1;
        StringGrid1->Cells[0][kolich]=kolich;
        StringGrid1->Cells[1][kolich]=TagParts->Strings[i];
        }
}
delete TagParts;
}

StringGrid1->Cells[1][kolich]=TagParts->Strings[i];

AnsiString Utf8_to_cp1251(const char *str)
{
  AnsiString res;
  int result_u, result_c;
  result_u = MultiByteToWideChar(CP_UTF8, 0, str, -1, 0, 0);
  if(!result_u)
    return 0;
  wchar_t *ures = new wchar_t[result_u];
  if(!MultiByteToWideChar(CP_UTF8, 0, str, -1, ures, result_u))
    {
      delete[] ures;
      return 0;
    }
  result_c = WideCharToMultiByte(1251, 0, ures, -1, 0, 0, 0, 0);
  if(!result_c)
    {
      delete[] ures;
      return 0;
    }
  char *cres = new char[result_c];
  if(!WideCharToMultiByte(1251, 0, ures, -1, cres, result_c, 0, 0))
    {
      delete[] ures;
      delete[] cres;
      return 0;
    }
  delete[] ures;
  res = AnsiString(cres);
  delete[] cres;
  return res;
}

AnsiString str = "Это текст в utf8, который нужно преобразовать в cp1251";
Edit1->Text = Utf8_to_cp1251(str.c_str());

StringGrid1->Cells[1][kolich] = Utf8_to_cp1251(TagParts->Strings[i].c_str());

UnicodeString Text=Utf8ToAnsi(IdHTTP1->Get(String("http://...html").w_str()));

AnsiString Text=Utf8ToAnsi(IdHTTP1->Get(WideString("http://...html")));