本文整理自网络,侵删。
Ctrl+中键↑ 放大 Ctrl+中键↓ 缩小uses ActiveX,ComObj;const OLECMDID_OPTICAL_ZOOM = 63;var ZoomIn: OleVariant;begin ZoomIn := 10; WebBrowser1.ExecWB(OLECMDID_OPTICAL_ZOOM, OLECMDEXECOPT_DODEFAULT, ZoomIn);end;
相关阅读 >>
更多相关阅读请进入《Delphi》频道 >>