im TWebBrowser ein PDF anzeigen, SetFocus ausführen und drucken

[rokli]

Hallo Zusammen,

ich habe ein Problem im TWebBrowser in Verbindung mit PDF Dokumenten.

Es gibt ein Verzeichnis, in dem sich viele PDF Dateien befinden. Mein Programm hat ein EDIT Feld und den TWebBrowser. Der Anwender gibt die Nummer eines PDF Dokumentes in das EDIT Feld ein und bekommt das PDF mit "WebBrowser1.Navigate(strRootPath + '4711.PDF')" angezeigt. Bisher alles wunderbar.

Ein (banales?) Problem habe ich anschließend bekommen! Nach der Zeile "WebBrowser1.Navigate ... " wollte ich den Cursor wieder in das EDIT Feld setzen (EDIT.SetFocus). Aber das funktioniert nicht.

Ich habe den Eindruck, dass es mit der Ladezeit des Navigators zu tun hat und das dadurch der SetFocus "verschluckt" wird. Ich habe dann versucht, mit "OnDownloadComplet" oder "OnNavigateComplete2" versucht abzuwarten und dann den Cursor in das EDTI Feld zu setzen - aussichtslos!

Weiß jemand, warum ich den SetFocus nicht erfolgreich ausführen kann?

Außerdem habe ich versucht, das PDF automatisch aus der Anwendung heraus zu drucken; das gelingt mir leider auch nicht. Hat jemand dazu einen Tipp?

Vielen Dank für Eure Hilfe
Rolf
Moin