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 xe2 - 实现无敌关机键

Delphi 简单电池电量显示

Delphi循环移位操作

Delphi idhttp post 支持 gzip 解压缩

Delphi 设置本地系统时间

Delphi getmimetypefromfile 获取文件mime类型

Delphi内嵌汇编语言basm精要

Delphi 2009 泛型容器单元(generics.collections)[3]: tstack<t>

Delphi读写文本文件 assignfile reset append

Delphi使用cef4Delphi制作chromium谷歌内核浏览器

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

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