WebBrowser OnNavigateComplete

**Intruder**

Wie genau muss der SourceCode aussehen ?
- Folgendes soll geschehen:

If Edit1.text = label1.caption then Webbrowser1.Navigate ('http://www.test.de');

und sobald die seite fertig geladen ist soll der Browser zu

http://www.andereseite.de
........

If Edit1.text = label1.caption then Webbrowser1.Navigate ('http://www.test.de')
when Webbrowser1.OnDocumentComplete then Webbrowser1.Navigate ('http://www.andereseite.de');

funktioniert nicht, da sind dann zu viele "When" und "Then" drin .... hab nen BlackOut

Schon mal DANKE

Intruder

**toms**

Hi!

Ich würd's so machen:

markieren

Delphi-Quellcode:

			If Edit1.text = label1.caption then 

  Webbrowser1.Navigate ('http://www.test.de') 

while WebBrowser1.ReadyState < READYSTATE_INTERACTIVE do 

begin

   Application.ProcessMessages; 

   Sleep(50);

end;

Webbrowser1.Navigate ('http://www.andereseite.de');

**Christian Seehase**

Moin toms,

warum < READYSTATE_INTERACTIVE, und nicht <> ?

Bei < müsste man ja explizit den Wert der Konstanten wissen...

WebBrowser OnNavigateComplete

WebBrowser OnNavigateComplete

Re: WebBrowser OnNavigateComplete

Re: WebBrowser OnNavigateComplete

Forumregeln

toms (CodeLib-Manager) Registriert seit: 10. Jun 2002 4.648 Beiträge Delphi XE Professional	#2 Re: WebBrowser OnNavigateComplete 18. Okt 2003, 11:58 Hi! Ich würd's so machen: markieren Delphi-Quellcode: If Edit1.text = label1.caption then Webbrowser1.Navigate ('http://www.test.de') while WebBrowser1.ReadyState < READYSTATE_INTERACTIVE do begin Application.ProcessMessages; Sleep(50); end; Webbrowser1.Navigate ('http://www.andereseite.de'); Thomas
	Zitat

Christian Seehase (Co-Admin) Registriert seit: 29. Mai 2002 Ort: Hamburg 11.105 Beiträge Delphi 11 Alexandria	#3 Re: WebBrowser OnNavigateComplete 18. Okt 2003, 12:10 Moin toms, warum < READYSTATE_INTERACTIVE, und nicht <> ? Bei < müsste man ja explizit den Wert der Konstanten wissen... Tschüss Chris Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel. Der Klügere gibt solange nach bis er der Dumme ist
	Zitat