Entwickler-Ecke

Internet / Netzwerk - TWEBBROWSER


rolulo - So 28.08.05 19:33
Titel: TWEBBROWSER
Hallo zusammen,

ich habe ein kleines Problem mit einem TWebBrowser - Element. Ich möchte eine Seite ausdrucken, die aber im Querformat gedruckt werden muß. Bis jetzt habe ich folgendes:

Delphi-Quelltext
1:
2:
3:
4:
procedure TForm1.Button1Click(Sender: TObject);
begin
Webbrowser1.ExecWB(olecmdid_Print,olecmdexecopt_dontpromptuser);
end;

Damit funktioniert der Ausdruck problemlos. Wenn ich jetzt aber die Unit Printers einbinde und dann mit

Delphi-Quelltext
1:
printer.orientation := poLandscape;                    

versuche die Orientierung zu ändern, hat dies keine Auswirkung.
Hat jemand eine Idee wie ich die Ausrichtung ändern kann? Die Druckereinstellungen müssen aber als Standard hochformatig bleiben.

mfg :lol:

Moderiert von user profile iconGausi: Code- durch Delphi-Tags ersetzt.