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

21/06/2008

10

[b:1f9c9093ec]Como saber se WebBrowser terminou de carregar a página?

Eu queria q quando ele terminasse da carregar a página
Ele exibisse uma mensagem.
Minha dúvida é: Como saber quando a página esta 100¬ carregada?[/b:1f9c9093ec]


Responder

Posts

21/06/2008

Mazzi

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++


Responder

21/06/2008

Mortify

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

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


Responder

21/06/2008

Mazzi

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;


Responder

21/06/2008

Mazzi

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

Abracos++


Responder

22/06/2008

Mortify

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


Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários. Para saber mais sobre o uso de cookies,
consulte nossa política de privacidade. Ao continuar navegando em nosso site, você concorda com a nossa política.

Aceitar