浏览代码

* alias hmonitor to windows.hmonitor. This handle moved from
windows unit to multimon in later delphi versions. An alias solution provides
compat to both.

git-svn-id: trunk@14954 -

marco 15 年之前
父节点
当前提交
038039674a
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      packages/winunits-base/src/multimon.pp

+ 1 - 1
packages/winunits-base/src/multimon.pp

@@ -50,7 +50,7 @@ const
 // HMONITOR is already declared if WINVER >= 0x0500 in windef.h
 // This is for components built with an older version number.
 type
-  HMONITOR = HANDLE;
+  HMONITOR = Windows.HMonitor;
 
 const
   MONITOR_DEFAULTTONULL    = $00000000;