Delphi WebBrowser1使用进度条查看浏览器状态

本文整理自网络，侵删。

 
WebBrowser1使用进度条查看浏览器状态

复制代码
procedure TForm1.WebBrowser1ProgressChange(ASender: TObject; Progress,
  ProgressMax: Integer);
begin
  ProgressBar1.Max:=ProgressMax;
  if Progress = -1 then
     //ProgressBar1.Visible:=false
  else
  begin
    ProgressBar1.Position := Progress;
    ProgressBar1.Visible := True;
  end;
  if  ProgressBar1.Position = ProgressMax then
    //ProgressBar1.Visible:=False;
end;
 

相关阅读 >>

Delphi excel数据导入数据库表

Delphi中读写txt文件的一段代码

Delphi isleapyear、isinleapyear - 是否是闰年

Delphi 计算l两个日期的时间间隔月数，月数差

Delphi 判断时间是否是下午 dateutils.ispm

Delphi 测试字符串读取类: tstringreader

Delphi 获取计算机从开机开始的已运行时间

Delphi 实现卸载windows应用程序（类似360软件管家-卸载程序）

Delphi 获取用户当前的windows临时文件夹

Delphi 数字分隔

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

转载请注明出处：木庄网络博客 » Delphi WebBrowser1使用进度条查看浏览器状态