Webbrowser Seite laden warten bis vollständig geladen

oern · Beiträge: 142 Linux, Win XP D7

Hi, gibt es eine möglichkeit ein einem TWebbrowser eine Seite zuladen und dann warten bis diese Seite fertig geladen wurde ?

thx für eure Antworten

Hansi@OMG · Beiträge: 304 Vista Delphi 2006 Prof., Lazarus

einfallen würde mir da nur ein umweg über die indykomponente idhttp
Da gibts ein OnLoad.
Wenn eine Seite angefordert wird lädst du sie einfach mit der idhttp kompo runter und onload lädst du sie lokal von der Platte in den Webbrowser.

_________________
Who doesn't know the Micrsoft developer "Mahatma Fatal Error"?

Holgerwa · Verfasst: So 30.10.05 10:25

Hallo,

im Event OnDocumentComplete des TWebBrowsers machst Du das hier ein:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:

procedure WebBrowser1.DocumentComplete(Sender: TObject; const pDisp: IDispatch; var URL: OleVariant);
var CurWebBrowser: IWebBrowser;
    TopWebBrowser: IWebBrowser;
begin
  CurWebBrowser := pDisp as IWebBrowser;
  TopWebBrowser := TWebBrowser (Sender).DefaultInterface;
  if CurWebBrowser = TopWebBrowser then
    ShowMessage ('Fertig geladen');
end;

Die Bedingung ist erst dann erfüllt, wenn sämtliche Teile im WebBrowser geladen sind.

Holger

oern · Beiträge: 142 Linux, Win XP D7

Hey Danke es funktioniert

snoopyonline · Beiträge: 38

Es gab zwar schon ne funktionierende Antwort aber hier ist noch ne Alternative:

webbrowser1.navigate('htt://www.delphi-forum.de');
while WebBrowser1.ReadyState <> READYSTATE_COMPLETE do application.processmessages;
//und jetzt geht weiter

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme