Delphi-使用套接字从Web下载文件

时间:2013-02-08 22:58:32

标签: delphi http sockets

我尝试过Synapse,Indy和ICS,我对它们并不满意。我想同时下载多个部分的多个文件,支持恢复,gzip编码文件,cookie,使用POST登录网站等等。所以我想我会用套接字写。 但我发现Delphi中有很多套接字:TTcpClient,TRawSocket,TCGIRequest,TClientSocket等等。它们都记录错误 - 很难找到用法示例。我尝试使用TTcpClient,但有时程序冻结,然后达到超时,我不知道为什么。在等待回复时看起来像是一个问题。这肯定不是服务器问题,因为我在localhost上测试。 使用HTTP协议的最佳套接字是什么?容易使用的东西?

我想在Delphi 7和XE2中使用。我不想使用任何类似WinAPI的东西,所以我不必处理PChars和其他非Delphi的东西。

我想的是:

1)完全符合我的要求 - 使用同一文件中的许多文件的进度条下载多个部分

OR

2)像telnet这样的东西 - 所以我只是把HTTP命令写成字符串,我得到了返回的字节数组,我可以转换成字符串或保存到tstream中。

1 个答案:

答案 0 :(得分:7)

我无法评论其他图书馆,但Indy支持您要求的所有内容。

如果服务器支持,TIdHTTP组件可以使用字节范围下载文件。您可以使用TIdHTTP.Head()方法检查服务器是否为给定的URL返回Accept-Ranges: bytes标头。如果是,则可以在从该URL下载数据时根据需要将TIdHTTP.Request.ContentRangeStartTIdHTTP.Request.ContentRangeEnd属性设置为所需的字节。要同时下载资源的多个部分,只需并行运行多个线程,每个线程都有自己的TIdHTTP组件。然后,您必须将多个部分下载到单独的临时文件中,然后在完成时将它们合并到最终文件中,或者创建一个预先调整大小的文件,然后在所需的开始时打开多个TFileStream个对象TIdHTTP写入的偏移量。

TIdHTTP支持Cookie。您可以将TIdCookieManager组件分配给TIdHTTP.CookieManager属性,也可以将其保留为未分配状态,TIdHTTP将在内部创建TIdCookieManager对象。无论哪种方式,还将TIdHTTP.AllowCookies属性设置为True。

网站登录可以通过两种不同的方式完成,具体取决于服务器是使用基于HTTP的身份验证还是基于WebForm的身份验证:

  1. 对于HTTP身份验证,请将所需的IdAuthentication...单元添加到uses子句中,例如IdAuthentacationDigestIdAuthenticationNTLM,或IdAllAuthentications更改为使用TIdHTTP注册个人身份验证类,然后根据需要设置TIdHTTP.Request.UserNameTIdHTTP.Request.Password属性。如果WebServer在请求期间请求身份验证,TIdHTTP将选择适当的类并使用它以指定的凭据登录。如果服务器拒绝凭据,则会触发TIdHTTP.OnAuthorization事件,以便您有机会更改凭据并重试。

  2. 对于WebForm身份验证,可以将TIdMultipartFormDataStream类传递给TIdHTTP.Post()方法,以发布multipart/form-data格式化的POST请求。

  3. Indy 10中的

    TIdHTTP支持gzip文件和deflate压缩文件(Iny 9及更早版本中的TIdHTTP不支持压缩)。您可以将TIdZLibCompressorBase派生的组件(例如TIdCompressorZLib)分配给TIdHTTP.Compressor属性,TIdHTTP将为您处理所有详细信息,包括发送相应的Accept-Encoding {1}}请求标头,并检查服务器的Transfer-Encoding响应标头。

    TIdHTTP包含可用于进度条等的OnWorkBeginOnWorkOnWorkEnd个事件。 OnWorkBegin事件具有AWorkCountMax参数,该参数指定已知的传输的字节总数,否则它将为0(使用Content-Length标头的HTTP响应将设置{{1因此,但使用AWorkCountMax标头的HTTP响应不会。 Transfer-Encoding: chunked事件具有OnWork参数,该参数指定到目前为止已传输的字节数,而不管AWorkCount值。