I'm not sure if there's a 'Delphi 2010' way, but there is a.I threw together this Delphi conversion of that routine (and in the process modified it to handle 4GB size files, should you need that). UsesWinApi.Windows;function FileSize(const aFilename: String): Int64;varinfo: TWin32FileAttributeData;beginresult:= -1;if NOT GetFileAttributesEx(PWideChar(aFileName), GetFileExInfoStandard, @info) thenEXIT;result:= Int64(info.nFileSizeLow) or Int64(info.nFileSizeHigh shl 32);end;You could actually just use GetFileSize but this requires a file HANDLE, not just a file name, and similar to the GetCompressedFileSize suggestion, this requires two variables to call. Both GetFileSize and GetCompressedFileSize overload their return value, so testing for success and ensuring a valid result is just that little bit more awkward.GetFileSize Ex avoids the nitty gritty of handling 4GB file sizes and detecting valid results, but also requires a file HANDLE, rather than a name, and (as of Delphi 2009 at least, I haven't checked 2010) isn't declared for you in the VCL anywhere, you would have to provide your own import declaration. For a compressed file (zip, rar, 7z etc) it will report the size of the archive in bytes, not the size of the decompressed contents. But for a ZIP file, the size of the file IS the size of the archive.
Download Cracked version of Embarcadero Delphi XE10 Seattle v23.0. Xe3 دانلود embarcadero rad studio embarcadero delphi keygen crack embarcadero delphi xe5 crack embarcadero delphi xe2 download crack embarcadero delphi 2010 cara crack embarcadero delphi 2010 crack embarcadero delphi 2010 crack embarcadero delphi.
For a file on a compressed volume it will report the size of the decompressed file, which is what you want because you are asking for the size of the storage object (the file) not the physical storage medium (the OS enforced compression). I'd like to mention few Pure Delphi ways. Though i think Deltics made a most speed-effective answer for Windows platform, yet sometimes you want just rely on RTL and also make portable code that would work in Delphi for MacOS or in FreePascal/Virtual Pascal/whatever.There is FileSize function left from Turbo Pascal days.The sample above lacks 'read-only' mode setting. You would require that to open r/o file such as one on CD-ROM media or in folder with ACLs set to r/o. Before calling ReSet there should be zero assigned to FileMode global var.It would not work on files above 2GB size (maybe with negative to cardinal cast - up to 4GB) but is 'out of the box' one.There is one more approach, that you may be familiar if you ever did ASM programming for MS-DOS.