Переход по ссылкам в Twebbrowser

[glebast]

Здравствуйте.
Может кто знает как можно реализовать такую штуку:
webbrowser каждые 10 секунд переходит на определенно-заданные ссылки.

Пробовал так, не чего не получается:

procedure TForm1.Button2Click(Sender: TObject);
begin
webbrowser1.Navigate('ссылка1');
sleep(10000);
webbrowser1.Navigate('ссылка2');
end;

[iskurt]

включи таймер, и в таймере счетчик поставь, при определенном счете - определенная ссылка. Button тут ни причем....