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 timage保存图片到stream及从stream中取图片

Delphi xe5 json与Delphi object的互换

Delphi分离汉字和英文字母

Delphi获取外部程序菜单并模拟点击菜单

Delphi如何判断一个combobox是否处于下拉状态

Delphi idftp

Delphi 正则表达式tperlregex 类的属性与方法

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

Delphi 数字分隔

Delphi 检查用户输入必须是汉字串

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

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