使用Win API 获取文件大小（可获取正在使用的文件，包括独占方式打开的文件GetFileSize） function GetSysFileSizeEx(AbsFileName:string):int64; var Handle: Windows.THandle; FindData: Windows.TWin32FindData; begin Handle := Windows.FindFirstFile(PChar(AbsFileName), FindData); if Handle <