Delphi 获取屏幕缩放比例

本文整理自网络，侵删。

 
功能：获取windows系统的缩放比例

var
dc:HDC;
scale:Double;
begin
  dc:= GetDC(0);
 scale := GetDeviceCaps(dc,LOGPIXELSX)/0.96/100;
  if scale <> 1 then
  begin
     FrmDPIError.Show;
  end;
end;
 

相关阅读 >>

Delphi窗口显示于parent控件上

Delphi滚动窗口标题

Delphi timagelist 中使用 透明 png 图标

Delphi中实现控件的拖拽

Delphi webbrowser 滚动条的去除、边框去除

Delphi执行cmd命令

Delphi实现分割文本文件的小程序

Delphi 字符串保存为 txt文件

Delphi中生成控件的两种方法

Delphi 通过系统api函数实现精确记时

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

转载请注明出处：木庄网络博客 » Delphi 获取屏幕缩放比例