Código Delphi [-] function GetFileSizeEx(hFile: THandle; var Data: int64): boolean; stdcall; external 'Kernel32.dll' name 'GetFileSizeEx'; implementation function _GetFileSize(hFile: THandle): int64; begin if not GetFileSizeEx(hFile, Result) then Result:= 0; end;
function GetFileSizeEx(hFile: THandle; var Data: int64): boolean; stdcall; external 'Kernel32.dll' name 'GetFileSizeEx'; implementation function _GetFileSize(hFile: THandle): int64; begin if not GetFileSizeEx(hFile, Result) then Result:= 0; end;