Entwickler-Ecke :: Thema anzeigen - Drucken über TWebBrowser Control

Winston2000 - Di 16.09.03 15:36
Titel: Drucken über TWebBrowser Control

Hallo alle zusammen.

Ich möchte ein IHTMLDocument über die TWebBrowser Komponente drucken. Das ganze funktioniert über die 'execCommand'-Function auch soweit. Jetzt möchte ich aber die Standardwerte in Kopf- und Fußzeile ändern. Diese stehen laut MSDN in der Registry. Ich verwende folgenden Code:

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:

Registry := TRegistry.Create; 
Registry.RootKey := HKEY_CURRENT_USER; 
Registry.OpenKey('\Software\Microsoft\Internet Explorer\PageSetup', True); 

OldHeader := Registry.ReadString('Header'); 
OldFooter := Registry.ReadString('Footer'); 

Registry.WriteString('Header', 'MyHeader'); 
Registry.WriteString('Footer', 'MyFooter'); 

IHTMLDocument2(WBZusammenfassung.Document).execCommand('Print', False, 0); 

Registry.WriteString('Header', OldHeader); 
Registry.WriteString('Footer', OldFooter); 
Registry.Free;

Das Problem ist nun, dass der alte Header bereits wieder in die Registry geschrieben wird BEVOR der Druckbefehl richtig verarbeitet wird. Ich muss also irgendwie warten bis der EXECCOMMAND Befehl vollständig ausgeführt ist.

Ich hoffe jemand hat eine Idee. Danke im vorraus!!!

Tana´Ri - Do 18.09.03 09:32

Stichwort: FindFirstPrinterChangeNotification [http://msdn.microsoft.com/library/en-us/graphics/hh/graphics/spoolfnc_4dk7.asp] (findnext..,findclose..);

ich hab selbst damit noch nichts gemacht, aber vielleicht hilft dir das weiter. Wenn du das PSDK hast wirst du hierbei weiter funktionen finden.

Requirements
Windows NT/2000/XP: Included in Windows NT 3.51 and later.
Windows 95/98/Me: Unsupported.
Header: Declared in Winspool.h; include Windows.h.

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!