Discussion :

[BlueX_scf]

Bonjour
comment pouvons nous connaitre (avec Delphi bien sûr) la taille occupé par un fichier sur disque !!!
Attention je veux pas de FileSize car cette fonction (ainsi que le TSearchRec) retourne la longeur du fichier (taille du fichier) en octet mais ne donne pas l'espace disque occupé par ce fichier à cause de l'histoire d'occupation TOTALE de secteurs et de clusters.
Quelcun aurait t'il connaissance d'une fonction (ou API) qui permettrait de récupérer celà ?
pour les néophites je m'explique en détail : quand vous selectionnez un fichier dans l'explorateur windows, et que vous faites
[MOUSE BOUTON DROIT+ Propriétés] vous obtenez dans la fen de prop deux grandeurs nommées :
TAILLE (qui correspond à ce que retourne le TSearchRec, c'est à dire la longeur en Octet
et une deuxieme grandeur
TAILLE SUR LE DISQUE qui correspond à l'espace occupé sur le disque par votre fichier en fonction de sa taille et de la taille des clusters du sys de fichier utilisé !!!! et c'est CETTE GRANDEUR que je veux récupérer

HELP ... please

[Eric Sigoillot]

Il faut arrondir à la taille des clusters. Si tu es en FAT32 par exemple, chaque cluster fait 16 Ko. Essaie de trouver comment récupérer la taille des clusters, ou tout au moins le système de fichiers. Ensuite, c'est juste une division...

A+

[cpdump]

La taille des clusters dépend de la taille des partitions et du file systeme, et n'est pas toujours de 16Ko. De plus lors du formatage, on peut choisir entre différentes tailles de cluster.

http://support.microsoft.com/default.aspx?scid=kb;en-us;314878

[BlueX_scf]

Merci ... c bien ce que je pensais. Il suffit de calculer en Alignant par rapport à un nombre entier de secteur (arrondi par exces).
Pour avoir les info du disque il suffit d'utiliser la fonction du SDK windows
GetDiskFreeSpace qui retourne les infos du disque et notement la taille des cluster en byte
PS. Microsoft continuera tjr à nous ettonner avec les NOMs choisis pour les fonctions

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
BOOL GetDiskFreeSpace(
 
    LPCTSTR lpRootPathName,	// address of root path 
    LPDWORD lpSectorsPerCluster,	// address of sectors per cluster 
    LPDWORD lpBytesPerSector,	// address of bytes per sector 
    LPDWORD lpNumberOfFreeClusters,	// address of number of free clusters  
    LPDWORD lpTotalNumberOfClusters 	// address of total number of clusters  
   );

[cpdump]

Cool, je me demandais comment récupérer cette info facilement.