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