Delphi WebBrowser1 缩放网页

本文整理自网络，侵删。

 
Delphi WebBrowser1 缩放网页
    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 winsock 域名获取远程服务器ip

pchar和array [0..255] of char的区别

Delphi android 中 toast 的实现(老外写的unit)

Delphi使用ixmlhttprequest 简单获取网页源代码

Delphi 无法打不开读取文件名有逗号的文件

Delphi 怎样判断windows的dpi大小？

Delphi程序禁止结束进程

Delphi下载程序并且urldownloadtofile的进度提示

Delphi从全路径中分离路径,有'\'

Delphi 运行中申请uac权限

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi WebBrowser1 缩放网页