Moin,

ich habe ein echt nerviges und störendes Problem mit der TWebBrowser Komponente.

Problem:
Ich möchte Bilder (eins nach dem anderen) in dem WebBrowser laden und anzeigen lassen und diese dann, skaliert, drucken.

Das anzeigen und skalieren ist ja auch kein Problem. Das Drucken funktioniert eigentlich auch... bevor die ersten sich jetzt fragen, was dieser Thread soll, kommt hier:

Das eigentliche Problem:
Das erste Bild wird im Browser angezeigt und auch wunderbar gedruckt. Die nächsten Bilder werden aber nur noch im Browser angezeigt, und nicht mehr gedruckt. Es kommen quasi nur noch leere Seiten. Man müsste also warten bis die Bilder angezeigt werden!

Theoretisch funktioniert das ja mit dem Befehl

markieren

Delphi-Quellcode:

  While WebBrowser.ReadyState <> READYSTATE_COMPLETE Do
    Application.ProcessMessages;

Aber das scheint alles nur die halbe Wahrheit zu sein, denn meines erachtens prüft dieser nicht, ob alle Elemente angezeigt werden, sondern nur ob unten links in der Ecke "Fertig" steht.

Sicher hat das jeder von euch schon einmal gesehen, das unten links "Fertig" steht, aber noch nicht alle Bilder, Elemente, etc. gezeigt werden; und ich denke genau dort ist das Problem!

Weiss jemand eine Lösung?

PS: Mit dem Befehl

markieren

Delphi-Quellcode:

  While WebBrowser.Busy <> False Do
    Application.ProcessMessages;

kann man ja eigentlich gar nichts anfangen... der prüft noch weniger...


Beste Grüsse,

Ricane

Hallo,
versuch mal das Event OnNavigateComplete2.

Zitat von Jens Schumann:

Hallo,
versuch mal das Event OnNavigateComplete2.

Herzlichen Dank!

Klappt, über einen klitzekleinen, Umweg super!


Beste Grüsse,

Ricane

Hinweis:

Wenn die Webseite mehrere Frames enthält, wird OnNavigateComplete2
für jedes Frame aufgerufen.