Sockets,TFileStream and ProgressBar (delphi)

[webdev]

hi! I use client/server socket components to send a file. a client app sends a file and the server app gets it. I know how to display the copying progress in a progressbar when receiving data, but how can I display in a progressbar how much of the file has been already uploaded from the client...