TDataEvent = procedure (Sender: TObject; const ContentLength, CurrentPos: Int64)

Событие вызывается при получении http-клиентом очередной порции данных от сервера.

Параметры:

• Sender - источник события.
• ContentLength - длина всего содержимого ответа.
• CurrentPos - текущая позиция чтения.

Ссылки: THttpClient.OnDataReceived