I. Obtenir la taille d'un fichier▲
Pour l'exemple, nous mettrons le code sur l'événement OnClick d'un Button (Button1), le résultat sur un Label (Label1) et l'information sera obtenue avec la fonction GetFileSize. (Elle retourne -1 si le fichier n'existe pas.)
Sélectionnez
void __fastcall TForm1::Button1Click(TObject *Sender)
{
HANDLE hFile;
hFile = CreateFile("fichier.ext", 0, 0, NULL, OPEN_EXISTING,
FILE_ATTRIBUTE_NORMAL, NULL);
int dwSize = GetFileSize (hFile, NULL);
CloseHandle(hFile);
Label1->Caption = dwSize;
}