Просмотр исходного кода

* add getfilesizeex as per 440BX' request.

(cherry picked from commit 715e727dc3214650e106e4a9d63566449be54e33)
marcoonthegit 10 месяцев назад
Родитель
Сommit
9aa828b810
1 измененных файлов с 2 добавлено и 1 удалено
  1. 2 1
      rtl/win/wininc/func.inc

+ 2 - 1
rtl/win/wininc/func.inc

@@ -1370,7 +1370,8 @@ function CONSOLE_REAL_OUTPUT_HANDLE : HANDLE;
   function Thread32First(hSnapshot: HANDLE; var lpte: THREADENTRY32): BOOL; stdcall; external KernelDLL;
   function Thread32Next(hSnapshot: HANDLE; var lpte: THREADENTRY32): BOOL; stdcall; external KernelDLL;
   function Toolhelp32ReadProcessMemory(th32ProcessID: DWORD; lpBaseAddress: pointer; lpBuffer: pointer; cbRead: SIZE_T; lpNumberOfBytesRead: PSIZE_T): BOOL; stdcall; external KernelDLL;
-
+  function GetFileSizeEx(InFileHandle : THANDLE;OutFileSize  : PLARGE_INTEGER): BOOL; stdcall; external kernelDLL; 
+ 
 {$endif read_interface}
 
 {$ifdef read_implementation}