Pour obtenir la taille d'un fichier, nous faisons appel à la fonction FileSeek. Le code suivant montre comment on récupère cette taille dans une chaîne et comment on la formate pour qu'elle soit facilement lisible par l'utilisateur :
int FichierHandle = FileOpen(Fichier, fmOpenRead);
Label1->Caption = FormatFloat("### ### ### Ko", FileSeek(FichierHandle, 0, 2));
FileClose(FichierHandle);
Tout d'abord, on récupère le Handle du fichier qu'on ouvre en lecture (
int FichierHandle = FileOpen(Fichier, fmOpenRead)
). Ensuite, on positionne le pointeur à 0 octets de la fin du fichier (2 représente la fin du fichier) :
FileSeek(FichierHandle, 0, 2)
. Avec la fonction FormatFloat, nous formattons la sortie de telle sorte qu'elle soit lisible par l'ordinateur. Dans la chaîne de format, un # représente un chiffre. (voir l'aide pour plus de détails). Enfin, on ferme le fichier grâce à un appel à la fonction FileClose (
FileClose(FichierHandle)
).