Add a feature "OnReceive" to can make a progress bar

[mmvisualgit]

I have add in "httpsend.pas" and "blcksock.pas" the feature "OnReceive". With this event I can set a prograssbar to see the download state.

I have tested ist, please change this files in the git repro.

Thank you very much.

httpsend.zip

[geby]

Why not use common TBlockSocket.OnStatus event? It can be used for progressbars on any socket and for all protocols.

[rvk01]

I have add in "httpsend.pas" and "blcksock.pas" the feature "OnReceive". With this event I can set a prograssbar to see the download state.

So you made a OnReceive but not an OnSend? Don't you need a progressbar for sending too?

Anyway... like @geby mentioned, there is already a TBlockSocket.OnStatus.
See example here: http://synapse.ararat.cz/doku.php/public:howto:onstatus
and here: http://synapse.ararat.cz/doku.php/public:howto:ftp_progressbar

You could just hook into THTTPSend.Sock.OnStatus.
Works for sending too ;)

[mmvisualgit]

In the "procedure TBlockSocket.RecvStreamSize" is a while, there I have include the "OnReceive".

I test the "TBlockSocket.OnStatus".

[rvk01]

In the "procedure TBlockSocket.RecvStreamSize" is a while, there I have include the "OnReceive".

RecvStreamSize -> RecvBufferStr -> RecvBufferEx -> RecvPacket -> RecvBuffer
And RecvBuffer has the DoMonitor and DoStatus.
The DoStatus/OnStatus can be used for status messages, the DoMonitor/OnMonitor can be used for the actual data.