Получение настраиваемого процента DPI в Delphi

Пытаюсь использовать свое приложение Delphi 2010 более дружелюбно. Режимы с высоким разрешением в Windows 7 Я пробовал несколько методов, чтобы получить PixelsPerInch и сравнить с 96. Увы, что бы я ни пробовал, я всегда получаю 96. Мои вопросы:

  1. Как лучше всего получить настраиваемый режим DPI?
  2. Является ли тот факт, что я получаю постоянную 96 независимо от того, что я, что такое восприятие, означает, что я что-то упускаю?

Вот то, что я пробовал

dpiX := Form1.PixelsPerInch

и

dpiX := Screen.PixelsPerInch

, и, наконец:

D2DFactoryOptions.DebugLevel := D2D1_DEBUG_LEVEL_NONE;
pD2DFactoryOptions := @D2DFactoryOptions;
if D2D1CreateFactory(
    D2D1_FACTORY_TYPE_SINGLE_THREADED,
    IID_ID2D1Factory,
    PD2DFactoryOptions,
    D2DFactory
    ) <> S_OK then exit;
D2DFactory.GetDesktopDpi(dpiX, dpiY)

Угадай. ? верно, dpiX - это константа 96 при 100%, 125% и 150%

Пожалуйста, посоветуйте.

15
задан asafadd 8 August 2011 в 14:42
поделиться