自动刷新(100分)

  • 主题发起人 主题发起人 allenk
  • 开始时间 开始时间
A

allenk

Unregistered / Unconfirmed
GUEST, unregistred user!
如何自动刷新IE浏览器,上大富翁,每次都要手动刷新,能否编成实现自动刷新?
 
用myie浏览器,可以自动刷新,设定自动刷新速度。。。
 
可以编程实现,用webbrower控件。用timer控件每一段时间刷新,但为了能不在看的时候刷新,需要刷新时
重新弹出一窗口!
 
sendkey('F5')!
 
使用NETCAPTOR浏览器,可以设定自动刷新
 
不是在用 DELPHI 吗!自己写一个简单的程序来用用啊!
在窗体中放一个 TTIMER、TWEBBROWSER 控件;
procedure TForm1.FormCreate(Sender: TObject);
var
URL : OleVariant;
begin
URL:='about:blank';
WebBrowser1.Navigate2(URL);
Timer1.Interval := '60000';
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
WebBrowser1.Navigate('WWW.DELPHIBBS.COM');
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
WebBrowser1.Refresh;
end;
 
接受答案了
 
后退
顶部