本文主要是介绍delphi 设置win10 dpi 缩放规则，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！
一、dpi介绍
dpi是“Dots Per Inch”的缩写，表示每英寸的像素点个数，也就是像素点的密集度。
dpi = 总像素点 / 总面积
比如一个32寸的显示，但分辨率只有1920*1440，而一个24寸的显示器，分辨率却达到3840*2160，很明显后面这个显示器的每英寸的像素点的个数多，显示的画面更加细腻。
所以：高分辨率不等于高dpi。
苹果的视网膜屏幕的核心就是高dpi：屏幕面积小，却分辨率高达5k，每英寸的像素点（dpi）固然多，画面自然细腻。
二、高dpi显示器如何导致软件显示异常
随着2K、4K显示器的普及，在使用这些高dpi显示器时，为了保证系统软件界面看起来不至于太小，导致视觉疲劳，一般会在系统中设置缩放比例。Windows操作系统对高dpi显示器缩放支持最好的是windows 10，建议使用高dpi显示器时使用Windows 10操作系统。
假设现在有一个软件界面（宽为950像素，高为700像素），该软件在24寸、分辨率为1900*1400的显示器上显示正常，但放到高dpi显示器（同样是24寸，但分辨率为3800*2800）上显示效果会如何？
从上图可以看到，同样尺寸的软件界面，在高dpi显示器上会显得非常小，会造成严重的视觉疲劳。
所以我们的软件需要针对高dpi进行缩放。
三、Windows 10 DPI缩放规则
Windows 10操作系统针对dpi缩放制定了3种规则，每个进程都必须匹配下面的一种规则，默认为PROCESS_DPI_UNAWARE：
1. PROCESS_DPI_UNAWARE
在软件启动时， 操作系统会自动将软件进行缩放拉伸；在系统dpi缩放改变时，系统也会将软件自动进行缩放拉伸，但软件不会收到WM_DPICHANGED消息。
2. PROCESS_SYSTEM_DPI_AWARE
在软件启动时，系统不会将软件进行缩放拉伸；但在系统dpi缩放改变时，系统会将软件进行缩放拉伸，但软件仍然不会收到WM_DPICHANGED消息。
3. PROCESS_PER_MONITOR_DPI_AWARE
在软件启动时，系统不会将软件进行缩放拉伸；同样，在系统dpi缩放改变时，系统也不会将软件进行缩放拉伸，但软件会收到WM_DPICHAN
procedure TFrmBase.SetDpiSize;
varsetProcessDPIAwareness: Pointer;setting, WinDPI: Integer;
begin// Set DPI Awareness depending on a registry settingwith TRegIniFile.create('SOFTWARE\' + SRegName) dobeginsetting := readInteger('SETTINGS', 'scale', 0);Free;end;handle := LoadLibrary('shcore.dll');if handle <> 0 thenbeginsetProcessDPIAwareness := GetProcAddress(handle, 'SetProcessDpiAwareness');if Assigned(setProcessDPIAwareness) thenbeginif setting < 2 then// setting <2 means no scaling vs WindowssetProcessDPIAwareness(0)else// setting 2: 120%, 3: 140% vs. Windows// The actual used scaling factor multiplies by windows DPI/96setProcessDPIAwareness(1);end;FreeLibrary(handle);// Get windows scaling as Screen.PixelsPerInch was read before swiching DPI awareness// Our scaling routines now work with WinDPI instead of Screen.PixelsPerInchWinDPI := Screen.MonitorFromWindow(application.handle).PixelsPerInch;end;
end;这篇关于delphi 设置win10 dpi 缩放规则的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！
