以较慢的速度发送 TCP POST 请求

Question

我有一个使用 TIdHTTP Post 请求上传文件的函数。它对文件使用 TIdMultiPartFormDataStream，因此正在使用该函数

function TIdCustomHTTP.Post(AURL: string; ASource: TIdMultiPartFormDataStream): string;

这部分工作正常，但我想减慢它的发送速度，以便它使用更少的带宽。

有没有办法循环一个 writebytes 调用或其他东西，这样我就可以在中间保持一些睡眠并减慢它的速度？我不关心请求的响应。

Answer 1

Indy 有一个 TIdInterceptThrottler 组件用于此目的。您可以将其分配给TIdHTTP.Intercept 属性，然后根据需要设置TIdInterceptThrottler.SendBitsPerSec 属性。