Die Größe einer Datei abrufen

Die Größe einer Datei abrufen

Die Größe einer Datei abrufen : Mehreren tausend Tipps, um Ihr Leben einfacher machen.

GetFileSize-Funktion (const FileName: String): Integer;
var
SR: TSearchRec;
beginnen
Ergebnis: = 0;

Wenn FindFirst (FileName, FaAnyFile, sr) = 0 then
beginnen
Ergebnis: sr =. Größe;
FindClose(sr);
Ende;
Ende;