Filling OSVersionInfo is not thread safe, it shoud be moved into the initialization part. It can cause the OpenType and the TWinHTTP.InternalGetProtocols check failed.
procedure TWinHTTP.InternalConnect(ConnectionTimeOut,SendTimeout,ReceiveTimeout: DWORD);
//...
begin
if OSVersionInfo.dwOSVersionInfoSize=0 then begin // API call once
OSVersionInfo.dwOSVersionInfoSize := sizeof(OSVersionInfo);
GetVersionEx(OSVersionInfo);
end;
//...
Filling
OSVersionInfo
is not thread safe, it shoud be moved into theinitialization
part. It can cause theOpenType
and theTWinHTTP.InternalGetProtocols
check failed.