I found the solution, just a litte typecasting and it's done:

var
  lBlkSock: TBlockSocket;
begin
  lBlkSock := TBlockSocket(Sender);
  if Assigned(FProgreso) then
  begin
    FProgreso.DocumentSize := (lBlkSock.Owner as THTTPSend).DownloadSize;
    FProgreso.Downloaded := lBlkSock.RecvCounter;
  end;
 
Leonardo M. Ramé
http://leonardorame.blogspot.com


----- Original Message -----
> From: Leonardo M. Ramé <martinr...@yahoo.com>
> To: Ararat Synapse <synalist-public@lists.sourceforge.net>
> Cc: 
> Sent: Thursday, September 15, 2011 5:28 PM
> Subject: [Synalist] THTTPSend file size
> 
> Hi, I'm using THttpSend with HeartBeat to monitor downloading of big files 
> from an Http Server.
> 
> This way I know how many bytes have been downloaded, but I can't see a 
> method for knowing how many bytes left to downloads.
> 
> Is there a way to know this?.
> 
> Thanks in advance,
> Leonardo M. Ramé
> http://leonardorame.blogspot.com
> 
> 
> ------------------------------------------------------------------------------
> Doing More with Less: The Next Generation Virtual Desktop 
> What are the key obstacles that have prevented many mid-market businesses
> from deploying virtual desktops?   How do next-generation virtual desktops
> provide companies an easier-to-deploy, easier-to-manage and more affordable
> virtual desktop model.http://www.accelacomm.com/jaw/sfnl/114/51426474/
> _______________________________________________
> synalist-public mailing list
> synalist-public@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/synalist-public
>

------------------------------------------------------------------------------
Doing More with Less: The Next Generation Virtual Desktop 
What are the key obstacles that have prevented many mid-market businesses
from deploying virtual desktops?   How do next-generation virtual desktops
provide companies an easier-to-deploy, easier-to-manage and more affordable
virtual desktop model.http://www.accelacomm.com/jaw/sfnl/114/51426474/
_______________________________________________
synalist-public mailing list
synalist-public@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/synalist-public

Reply via email to