[Drongo]

HTTPQuery »

Этого компонента у меня нет или я не нашёл, сделал так, заменил все входы HTTPQuery на IdHTTP1.

В Memo загружается страница какой-то текст, при сохранении в html получается та же самая страница, что и по ссылке - http://www.virustotal.com/search.html

Код:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    AnsiString md5Hesh = "0045BCBD3047391E47F3B56DC7C7F2F2";
    TStringList *post = new TStringList;
    TStringStream *response = new TStringStream("");

    post->Add("chain=" + md5Hesh);

    try{
       IdHTTP1->Post("http://www.virustotal.com/search.html", post, response);
      }
    catch(EIdSocketError &se){
       ShowMessage(se.Message);
      }
    catch(Exception &e){
       ShowMessage(e.Message);
      }
//    ShowMessage(response->DataString);

    delete IdHTTP1, post, response;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::IdHTTP1Redirect(TObject *Sender, AnsiString &dest,
      int &NumRedirect, bool &Handled)
{
    Memo1->Lines->Add(IdHTTP1->Get(dest));
    Handled = false;
}
//---------------------------------------------------------------------------

Я что-то не так делаю?