Obtenir la taille d'un fichier en octets à l'aide de Delphi

le Taille du fichier La fonction renvoie la taille d'un fichier, en octets - un résultat utile pour certaines applications de gestion de fichiers dans un programme Delphi.

Obtenir la taille du fichier

La fonction FileSize renvoie la taille d'un fichier en octets; la fonction renvoie -1 si le fichier n'a pas été trouvé.

// renvoie la taille du fichier en octets ou -1 s'il n'est pas trouvé.
une fonction FileSize (fileName: wideString): Int64;
var
sr: TSearchRec;
commencer
si FindFirst (fileName, faAnyFile, sr) = 0 ensuite
résultat: = Int64 (sr.FindData.nFileSizeHigh) shl Int64 (32) + Int64 (sr.FindData.nFileSizeLow)
autre
résultat: = -1;
FindClose (sr);
fin;

Lorsque vous avez la taille d'un fichier en octets, vous souhaiterez peut-être formater la taille d'affichage (Kb, Mb, Gb) pour aider vos utilisateurs finaux à comprendre les données sans avoir à convertir les unités.