Dateigröße ermitteln, wie geht Ihr vor?

[HolgerX]

Hmm..


Wieso dann nicht gleich Typfixiert?

Delphi-Quellcode:

function GetSize(const fileName: WideString): Int64;
var
   info: TWin32FileAttributeData;
begin
   if not GetFileAttributesExW(PWideChar(fileName), GetFileExInfoStandard, @info) then
     RaiseLastOSError;
   Result := Int64(info.nFileSizeLow) or Int64(info.nFileSizeHigh shl 32);
end;

Dies funktioniert unter allen Delphi-Versionen, welche WideChar unterstützen (somit eigentlich fast alle )

Edit:
Für alle API-Funktionen verwende ich nur noch die Wide Versionen. Somit gibt es auch keine Probleme..