Holen Sie sich die Größe einer Datei in Bytes mit Delphi

Das Dateigröße Die Funktion gibt die Größe einer Datei in Bytes zurück - ein nützliches Ergebnis für bestimmte File-Handing-Anwendungen in einem Delphi-Programm.

Dateigröße abrufen

Die FileSize-Funktion gibt die Größe einer Datei in Byte zurück. Die Funktion gibt -1 zurück, wenn die Datei nicht gefunden wurde.

// gibt die Dateigröße in Bytes oder -1 zurück, falls nicht gefunden.
Funktion FileSize (fileName: wideString): Int64;
var
sr: TSearchRec;
Start
wenn FindFirst (Dateiname, faAnyFile, sr) = 0 dann
Ergebnis: = Int64 (sr.FindData.nFileSizeHigh) shl Int64 (32) + Int64 (sr.FindData.nFileSizeLow)
sonst
Ergebnis: = -1;
FindClose (sr);
Ende;

Wenn Sie die Größe einer Datei in Byte haben, möchten Sie möglicherweise die Anzeigegröße (Kb, Mb, Gb) formatieren, um Ihren Endbenutzern das Verständnis der Daten zu erleichtern, ohne Einheiten umrechnen zu müssen.