• XP對高DPI的支持比較差勁， 大部分情況下就是字體的放大， 當然我們程序也可以通過GetDeviceCaps(hDC, LOGPIXELSX)獲取DPI后自己對繪畫的內(nèi)容進行縮放。
• 我們知道Vista/Win7我們可以禁止DWM（Desktop Window Manager）， 該模式我們稱之為Basic模式， 這種模式下的高DPI效果和XP一樣。對于DWM沒有禁掉的情況， Vista/Win7/Win8 對高DPI的支持又分為2種情況

1. 高DPI支持是通過DWM的縮放實現(xiàn)的，比如我們當前系統(tǒng)的DPI是200%，系統(tǒng)會告訴你當前DPI仍然是96（100%），程序會按照100%的方式進行繪畫， 但是系統(tǒng)給我們的坐標是根據(jù)DPI縮小后的(調(diào)用GetWindowRect或是通過GetSystemMetrics(SM_CXSCREEN))，當我們畫完之后再對整個窗口進行200% 放大后畫到屏幕上，程序就自動支持高DPI了。
2. 系統(tǒng)給我們提供了2個APi：SetProcessDPIAware 和 IsProcessDPIAware，通過調(diào)用SetProcessDPIAware，我們告訴系統(tǒng)不要對我們的程序進行DWM虛擬化。

這個demo是用來用在開始菜單的。
首先開始菜單有大小圖標之分，可以在菜單的設(shè)置中設(shè)置。第二系統(tǒng)有各個DPI，不同的dpi有不同的大小需要處理。下面就是一些實現(xiàn)過程

• 首先獲取圖標獲取大小圖標，菜單程序快捷地址在C:\ProgramData\Microsoft\Windows\Start Menu\Programs\

function TGetInkImageHelper.GetFileIcon(FileName: string; ASmall: Boolean):
  HIcon;
var
  Info: TSHFileInfo;
  Flags: Cardinal;
begin
  result := 0;
  try
    FileName := ExpCmd(FileName);
    if ASmall then
      Flags := SHGFI_ICON or SHGFI_SMALLICON
    else
      Flags := SHGFI_ICON or SHGFI_LARGEICON;

    SHGetFileInfo(PChar(FileName), FILE_ATTRIBUTE_NORMAL, Info,
      SizeOf(TSHFileInfo), Flags);
    Result := Info.hIcon;
  except

  end;
end;

• 獲取更具大圖標和小圖標 設(shè)置不同行高度
  TreeViewInk.Perform(TVM_SETITEMHEIGHT, 20, 0);

• 獲取DPI

function TSetTreeViewHigh.GetDPI: Integer;
var
  DC: HDC;
begin
  DC := GetDC(0);
  Result := GetDeviceCaps(DC, logpixelsx);
  ReleaseDC(0, DC);
end;

• 與DPI有關(guān)的圖片參數(shù)

• 由上，我們可以總結(jié)出顯示的規(guī)律了
  1.都是4的倍數(shù)
  2.大圖片是小圖片的顯示的2倍
  3.間隔的大小話比圖片大小大1號

procedure TSetTreeViewHigh.SetNum(num: Integer);
begin
  smallSpace := 5 * num;
  largeSpace := 10 * num;

  mySmallList.Height := 4 * num;
  myLargeList.Height := 8 * num;
end;