delphi 用idhttp打开网页或下载文件时如何显示进度

本文整理自网络，侵删。

 在它的workbegin work事件中写代码

procedure TfrmDownLoad.IdHTTP1WorkBegin(Sender: TObject;
AWorkMode: TWorkMode; const AWorkCountMax: Integer);
begin
ProgressBar1.Max := AWorkCountMax ;
end;


procedure TfrmDownLoad.IdHTTP1Work(Sender: TObject; AWorkMode: TWorkMode;
const AWorkCount: Integer);
begin
ProgressBar1.Position := AWorkCount ;
end;
 

相关阅读 >>

Delphi 内存管理[6]

Delphi 对非活动窗口进行屏幕截图

Delphi delete 字符串函数

Delphi 打开网址链接

Delphi显示gif动画简单方法

Delphi 很方便调用的log日志方法

Delphi dbgrid适应宽度

Delphi fmx 从app程序直接跳转到支付宝付款转帐页面

Delphi for 循环 to和downto的理解

Delphi 一个文件重复生成的小工具[附源码]

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 用idhttp打开网页或下载文件时如何显示进度