with http do begin
        HandleRedirects := True;
        AllowCookies := False;
        RedirectMaximum := 10;
        Request.UserAgent := useragent;
        Request.Accept := 'text/html, application/xml;q=0.9, application/xhtml+xml, image/png, image/jpeg, image/gif, image/x-xbitmap, */*;q=0.1';
        Request.AcceptCharSet := 'iso-8859-1, utf-8, utf-16, *;q=0.1';
        Request.ContentEncoding := 'UTF-8';
        Request.ContentType := 'application/x-www-form-urlencoded';
      end;
      source := (http.Get( url) );