本文整理自网络,侵删。
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 使用indy idftp 通过android 上传文件
Delphi firemonkey应用程序取得控制的位置(坐标)的话
Delphi 如何从一张图片中裁剪一部分距形图片另存为文件(使用canvas.copyrect)
更多相关阅读请进入《Delphi》频道 >>