Включение javascript и Cookies в IdHTTP

  1. На форме расположены Button1 и Memo1.
  2. При нажатии на кнопку получаюHtml код страницы и записываю его в Memo1.
  3. Код работает идеально на всех сайтах, но вот на том что мне нужно место Html кода я получаю вот такое сообщения: Please enable JavaScript and Cookies in your browser.
  4. Как включить javascript и Cookies в IdHTTP ?

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
  IdHTTP : TIdHTTP;
  Id_HandlerSocket : TIdSSLIOHandlerSocketOpenSSL;
begin
  IdHTTP := TIdHTTP.Create(Nil);
  Id_HandlerSocket := TIdSSLIOHandlerSocketOpenSSL.Create(IdHTTP);
  try
    IdHTTP.Request.BasicAuthentication := False;
    IdHTTP.Request.UserAgent := 'Mozilla/5.0 (Windows NT 6.1; WOW64; rv:12.0) Gecko/20100101 Firefox/12.0';
 
    Id_HandlerSocket.SSLOptions.Mode := sslmClient;
    Id_HandlerSocket.SSLOptions.Method := sslvSSLv23;
    IdHTTP.IOHandler := Id_HandlerSocket;
 
   memo1.lines.text := IdHTTP.Get('Тут URL сайта');
  Finally
    Id_HandlerSocket.Free;
    IdHTTP.Free;
  end;
end;

Ответы (0 шт):