Как я могу сообщить Windows 8.1, что мое приложение Delphi хочет поддерживать разрешение на каждый монитор?

Он задокументирован в теме MSDN Написание приложений для настольных ПК и Win32 с поддержкой DPI:

Отметьте приложение в соответствии с поддержкой монитора-DPI, изменив манифест приложения или вызвав SetProcessDpiAwarenessAPI. Мы рекомендуем использовать манифест приложения, поскольку он устанавливает уровень осведомленности о DPI при запуске приложения. Используйте API только в следующих случаях:

• Ваш код находится в dll, которая запускается через rundll32.exe. Это механизм запуска, который не поддерживает манифест приложения.
• Вам необходимо принимать сложные решения во время выполнения на основе версии ОС или других соображений. Например, если вам нужно, чтобы приложение распознавало системный DPI в Windows 7 и динамически распознавало в Windows 8.1, используйте настройку манифеста True / PM.

Если вы используете метод SetProcessDpiAwareness для установки уровня осведомленности о DPI, вы должны вызвать SetProcessDpiAwareness перед любым вызовом Win32API, который заставляет систему начать виртуализацию.

Значение манифеста осведомленности о DPI, Описание

False: приложение не поддерживает DPI.

True Устанавливает приложение с учетом разрешения системы.

Для каждого монитора. В Windows 8.1 устанавливает приложение, поддерживающее разрешение на каждый монитор. В Windows Vista через Windows 8 устанавливает приложение, не поддерживающее DPI.

True / PM. В Windows 8.1 устанавливает приложение с учетом разрешения каждого монитора. В Windows Vista через Windows 8 устанавливает приложение с учетом системного разрешения DPI.

Вы просто используете стандартный манифест с учетом DPI, но указываете True / PM или Per-monitor вместо True.

В той же теме приводится следующий манифест с поддержкой DPI:

<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3" >
  <asmv3:application>
    <asmv3:windowsSettings xmlns="http://schemas.microsoft.com/SMI/2005/WindowsSettings">
      <dpiAware>true</dpiAware>
    </asmv3:windowsSettings>
  </asmv3:application>
</assembly>

Итак, замените True выбранным вами значением.

Этот манифест работает, но с некоторыми предупреждениями:

• Обратите внимание на различные различия в «метаданных» для asmv1, asm.v2 и asmv3. Наверное, не важно.

• Как заметил Дэвид, вероятно, значение True/PM, а не True, имеет значение. Microsoft, по всей видимости, задокументировала это. (усмехается)

• Некоторые варианты SMI / 2011 БУДУТ запускаться БЕЗ ужасных ошибок запуска SxS, но я не нашел вариант SMI / 2011, который РАБОТАЕТ.

• После использования приложения, которое включало Per Monitor API и определяло совместимость с ОС как Windows 8.1, я обнаружил в своем приложении УЖАСНЫЕ регрессии. Microsoft изменила поведение фокуса мыши в приложениях уровня Windows 8.1. Я НЕ РЕКОМЕНДУЮ ДАННЫЙ ПОДХОД. Зарегистрируйтесь с помощью КОДА, а не с помощью МАНИФЕСТА, и НЕ ИСПОЛЬЗУЙТЕ <supportedOS Id="{1f676c76-80e1-4239-95bb-83d0f6d0da78}"/> пример ниже!

Вот XML. У меня возникли проблемы с тем, что StackOverflow искажает этот XML, поэтому, если он выглядит плохо, вы видите ошибки StackOverflow.

<?xml version="1.0" encoding="utf-8" ?>
<asmv1:assembly manifestVersion="1.0" xmlns="urn:schemas-microsoft-com:asm.v1" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" >
  <assemblyIdentity version="1.0.0.0" name="MyApplication.app"/>
  <trustInfo xmlns="urn:schemas-microsoft-com:asm.v2">
    <security>
      <requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
        <requestedExecutionLevel level="asInvoker" uiAccess="false" />
      </requestedPrivileges>
    </security>
  </trustInfo>

  <compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
    <application>
      <supportedOS Id="{1f676c76-80e1-4239-95bb-83d0f6d0da78}"/>
    </application>
  </compatibility>

  <asmv3:application xmlns:asmv3="urn:schemas-microsoft-com:asm.v3">
    <asmv3:windowsSettings
         xmlns="http://schemas.microsoft.com/SMI/2005/WindowsSettings">
      <dpiAware>True/PM</dpiAware>
    </asmv3:windowsSettings>
  </asmv3:application>
</asmv1:assembly>

И у вас тоже может быть код:

Пример кода:

unit PerMonitorApi;

interface

const
   Process_DPI_Unaware = 0;
   Process_System_DPI_Aware = 1;    // Old windows 8.0
   Process_Per_Monitor_DPI_Aware = 2; // Windows 8.1

function SystemCanSupportPerMonitorDpi(AutoEnable: Boolean): Boolean; // New Windows 8.1 dpi awareness available?

function SystemCanSupportOldDpiAwareness(AutoEnable: Boolean): Boolean; // Windows Vista/ Windows 7 Global System DPI functional level.

var
   _RequestedLevelOfAwareness:LongInt;
   _ProcessDpiAwarenessValue:LongInt;

implementation

uses
   System.SysUtils,
   WinApi.Windows;

type
   TGetProcessDPIAwarenessProc = function(const hprocess: THandle; var ProcessDpiAwareness: LongInt): HRESULT; stdcall;
   TSetProcessDPIAwarenessProc = function(const ProcessDpiAwareness: LongInt): HRESULT; stdcall;

const
   E_ACCESSDENIED = $80070005;



function _GetProcessDpiAwareness(AutoEnable: Boolean): LongInt;
var
   hprocess: THandle;
   HRESULT: DWORD;
   BAwareness: Integer;
   GetProcessDPIAwareness: TGetProcessDPIAwarenessProc;
   LibHandle: THandle;
   PID: DWORD;

   function ManifestOverride: Boolean;
   var
      HRESULT: DWORD;
      SetProcessDPIAwareness: TSetProcessDPIAwarenessProc;
   begin
      Result := False;
      SetProcessDPIAwareness := TSetProcessDPIAwarenessProc(GetProcAddress(LibHandle, 'SetProcessDpiAwareness'));
      if Assigned(SetProcessDPIAwareness) and (_RequestedLevelOfAwareness>=0) then
      begin
         HRESULT := SetProcessDPIAwareness(_RequestedLevelOfAwareness ); // If we do this we don't need the manifest change.
         Result := (HRESULT = 0) or (HRESULT = E_ACCESSDENIED)
         // if Result = 80070005 then ACESS IS DENIED, means already set.
      end
   end;

begin
   Result := _ProcessDpiAwarenessValue;
   if (Result = -1) then
   begin
      BAwareness := 3;
      LibHandle := LoadLibrary('shcore.dll');
      if LibHandle <> 0 then
      begin
         if (not AutoEnable) or ManifestOverride then
         begin
            // This supercedes the Vista era IsProcessDPIAware api, and is available in Windows 8.0 and 8.1,although only
            // windows 8.1 and later will return a per-monitor-dpi-aware result.
            GetProcessDPIAwareness := TGetProcessDPIAwarenessProc(GetProcAddress(LibHandle, 'GetProcessDpiAwareness'));
            if Assigned(GetProcessDPIAwareness) then
            begin
               PID := WinApi.Windows.GetCurrentProcessId;
               hprocess := OpenProcess(PROCESS_ALL_ACCESS, False, PID);
               if hprocess > 0 then
               begin
                  HRESULT := GetProcessDPIAwareness(hprocess, BAwareness);
                  if HRESULT = 0 then
                     Result := BAwareness;
               end;
            end;
         end;
      end;
   end;
end;

// If this returns true, this is a windows 8.1 system that has Per Monitor DPI Awareness enabled
// at a system level.
function SystemCanSupportPerMonitorDpi(AutoEnable: Boolean): Boolean;
begin
   if AutoEnable then
   begin
    _RequestedLevelOfAwareness := Process_Per_Monitor_DPI_Aware;
    _ProcessDpiAwarenessValue := -1;
   end;
   Result := _GetProcessDpiAwareness(AutoEnable) = Process_Per_Monitor_DPI_Aware;
end;


// If this returns true, This is either a Windows 7 machine, or a Windows 8 machine, or a
// Windows 8.1 machine where the Per-DPI Monitor Awareness feature has been disabled.
function SystemCanSupportOldDpiAwareness(AutoEnable: Boolean): Boolean;
begin
   if AutoEnable then
   begin
     _RequestedLevelOfAwareness := Process_Per_Monitor_DPI_Aware;
     _ProcessDpiAwarenessValue := -1;
   end;

   Result := _GetProcessDpiAwareness(AutoEnable) = Process_System_DPI_Aware;
end;


initialization
   _ProcessDpiAwarenessValue := -1;// not yet determined.
   _RequestedLevelOfAwareness := -1;

end.

Либо измените манифест, указанный в Project | Опции | Application или включите дополнительный манифест с помощью директивы $ R в файл .dpr.

Также ваш раздел asmv3: application выглядит нормально, за исключением того, что, я думаю, вам нужно написать «True» с нижним регистром t, как в «true».