• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 713
  • Last Modified:

help in idftp delphi

Hello experts.Please help in one component.
I have idhttp in a form.
And when i press a button idftp start uploading a file to server.

Please help, how can i make that in uploading process shows a progressbar and ftp uploading status.
0
helyonprime96
Asked:
helyonprime96
2 Solutions
 
jimyXCommented:
0
 
Ephraim WangoyaCommented:
You can use the following events or download a complete example from
http://www.indyproject.org/sockets/demos/index.en.aspx
procedure TfrmMain.FTPWorkBegin(Sender: TObject; AWorkMode: TWorkMode;
  const AWorkCountMax: Integer);
begin
  pbProgress.Max := AWorkCountMax;
  pbProgress.Position := 0;
  pbProgress.Visible := true;
end;

procedure TfrmMain.FTPWork(Sender: TObject; AWorkMode: TWorkMode;
  const AWorkCount: Integer);
begin
  pbProgress.Position := AWorkCount;
end;

procedure TfrmMain.FTPWorkEnd(Sender: TObject; AWorkMode: TWorkMode);
begin
  pbProgress.Visible := false;
end;

Open in new window

0
 
helyonprime96Author Commented:
thanks, friend
0

Featured Post

Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Tackle projects and never again get stuck behind a technical roadblock.
Join Now