dlaczego webbrowser nie patrzy na zmienne?

0

Dlaczego Od razu wyświetla mi się strona interii? Przecież powinno być dobrze tzn najpierw onet, potem wp i dopiero interia :|
Z góry dzięki za odp.

procedure TForm1.Timer1Timer(Sender: TObject);
begin

if I=0 then begin
webbrowser1.Navigate('http://www.onet.pl');
// showmessage(inttostr(I) + 'nr1');
I:=1;
// showmessage(inttostr(I) + 'nr2');
end;

if I=1 then begin
webbrowser1.Navigate('http://www.wp.pl');
// showmessage(inttostr(I) + 'nr3');
I:=2;
// showmessage(inttostr(I) + 'nr4');
end;

if I=2 then begin
webbrowser1.Navigate('http://www.interia.pl');
// showmessage(inttostr(I) + 'nr5');
I:=0;
// showmessage(inttostr(I) + 'nr6');
end;
end;

I JESZCZE:

procedure TForm1.FormCreate(Sender: TObject);
begin
I:=0;
end;

end.

0

Bo nie zdąży się załadować jedna strona, i już się ładuje druga - dlatego ma czas tylko na załadowanie ostatniej.

0

o bosh... przeczytaj jakiś kurs dla początkuących....

[code]procedure TForm1.Timer1Timer(Sender: TObject);
begin

case i of
0 : webbrowser1.Navigate('http://www.onet.pl');
1 : webbrowser1.Navigate('http://www.wp.pl');
2 : webbrowser1.Navigate('http://www.interia.pl');
end;

inc(i);
if i > 2 then i := 0;
end;[/code]

1 użytkowników online, w tym zalogowanych: 0, gości: 1