upload file (put) and ProgressBar

Giganews Newsgroups
Subject: upload file (put) and ProgressBar
Posted by:  Mike A (Mike_2_1976_…@yahoo.com)
Date: Fri, 17 Feb 2006

Hello,

I'm running INDY 10.1.5 with Delphi 7 enterprise edition.
I have GET command to download file from the server, all works fine and
progressbar showing
clearly, as showing
But screen is freeze when I use PUT command (upload file) and the
progressbar not working
till the file uploaded. and help will be appreciated
procedure TForm1.IdFTP1Work(Sender: TObject; AWorkMode: TWorkMode;
  const AWorkCount: Integer);
begin
ProgressBar1.Position := AWorkCount;

AbortTransfer := false;

end;

Thanks for any help

Replies