Como saber se WebBrowser terminou de carregar a página?

Meu caro me responda essas indagacoes , por favor:
-Vc quer usar o WebBrower (I.E, SAFARI, etc....???)
-Vc quer usar um que vc criou em Delphi?
-QUal DElphi vc esta usando?

vlw?

Abracos++

[b:dd03bbec93]Desculpa
Devia ter sido mais claro ^^

é o TWebBrowser (componente do delphi)
Estou usando o Delphi 7[/b:dd03bbec93]

Veja se é isso que vc quer amigo.


[b:133453c7ca]// Para mostrar um carregano pagina use esse evento//[/b:133453c7ca]

procedure TfrmBrowser.BrowserBeforeNavigate2(Sender: TObject;
const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
Headers: OleVariant; var Cancel: WordBool);
begin
edEndereco.Text := Browser.LocationURL;
StatusBar1.Panels[0].Text := ´Carregando página´;
Animacao.Animate :=true;
end;

[b:133453c7ca]//Para mostrar que pagina foi carregada por completo use esse outro evento//[/b:133453c7ca]

procedure TfrmBrowser.BrowserDocumentComplete(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
begin
edEndereco.Text :=´´;
edEndereco.Text := Browser.LocationURL;
frmNavegador.Caption := ´Navegador Padrão :: Sistemas >´+
Browser.LocationName;
StatusBar1.Panels[0].Text := ´Página Completa´;
Animacao.Animate :=false;
end;

esses animate... é coisa q eu criei... mas veja somente o que vc precisa desses eventos, eu acho q deve ser esse o caminho.

Abracos++

[b:088565495f]Valew xD[/b:088565495f]