Delphi Indy HTTP.GET high cpu usage

288 views Asked by At

on first download there is high cpu usage, later all is ok. This problem exists since Delphi XE7 and now in XE8. In earlier versions i think there was always low CPU usage. I tested it with latest SSL files from https://indy.fulgan.com/

Thanks for help.

procedure TForm1.Button1Click(Sender: TObject);
var
  IdHTTP: TIdHTTP;
  IdSSL: TIdSSLIOHandlerSocketOpenSSL;
  dane: TMemoryStream;

begin
  IdHTTP := TIdHTTP.Create;
  IdOpenSSLSetLibPath(ExtractFilePath(ParamStr(0)));
  IdSSL := TIdSSLIOHandlerSocketOpenSSL.Create();
  IdHTTP.Request.Accept := 'application/vnd.twitchtv.v3+json';
  IdHTTP.IOHandler := IdSSL;
  IdHTTP.Request.CustomHeaders.AddValue('Client-ID', 'smb61nyd0vxmqdn9d3k735qbx41cdyg');
  dane := TMemoryStream.Create;
  try
    IdHTTP.Get('https://api.twitch.tv/kraken/streams?game=StarCraft:%20Brood%20War', dane);
  finally
    dane.Free;
  end;
end;
0

There are 0 answers