Question

关于delphi的webbrowser控件求教，很简单的问题

我想做一个浏览器，让他启动后自动顺序访问几个网址

我这样写
webbrowser1.navigate(url1);
webbrowser1.navigate(url2);
....

这样的话，我担心有的网页还没有完全访问完就会自动跳到下一个网页了

有没有方法确保程序完整访问了这个页面后再跳到下一个？

我尝试这样：
webbrowser1.navigate(url1);
sleep(8000);
webbrowser1.navigate(url2);

让程序暂停8秒，但是都8秒过去了，第一个网页还没是没有显示出来

8秒的时间完全能够加载完那个网页的

请问，应该用怎么样的方法实现，谢谢
你那个试过了，死循环，不停的刷新url1

Answer 1

webbrowser1.navigate(url1);

while webbrowser1.readystate<>4 do
begin
application.processmessages;
sleep(100);
end;

webbrowser1.navigate(url2);