pdf im TWebBrowser mit voreingestellten Zoom-Faktor

[hoika]

Hallo,

Delphi-Quellcode:

const
  OLECMDID_OPTICAL_ZOOM = 63;
var
  zoom  : OleVariant;
  iZoom : Integer;
begin
  iZoom:= 80;  // z.B. 80%
  zoom := iZoom;  
  WebBrowser.ExecWB(OLECMDID_OPTICAL_ZOOM, OLECMDEXECOPT_PROMPTUSER, zoom);