浏览代码

* and redef with int64 typing

marcoonthegit 9 月之前
父节点
当前提交
4affa41a43
共有 1 个文件被更改,包括 3 次插入0 次删除
  1. 3 0
      rtl/win/wininc/redef.inc

+ 3 - 0
rtl/win/wininc/redef.inc

@@ -1008,6 +1008,9 @@ function CreateWaitableTimer(lpTimerAttributes :LPSECURITY_ATTRIBUTES; bManualRe
 function OpenWaitableTimer(dwDesiredAccess:DWORD;bInheritHandle:BOOL;lpTimerName:LPCTSTR):THandle;external 'kernel32' name 'OpenWaitableTimerA';
 //function PropertySheetA(p:TPROPSHEETHEADER):longint; external 'comctl32' name 'PropertySheetA';
 
+// native int64 typed overload.
+function GetFileSizeEx(InFileHandle : THANDLE;OutFileSize  : PINT64): BOOL; stdcall; external kernelDLL; 
+
 // windows because of Delphi compat.
 
 {$calling default}