DirectoryEntrySize()

Syntaxe

Resultat.q = DirectoryEntrySize(#Repertoire)

Renvoie la taille en octets du fichier courant dans le #Repertoire examiné par les fonctions ExamineDirectory() et NextDirectoryEntry().

Arguments

#Repertoire

Le répertoire examiné avec ExamineDirectory().

Valeur de retour

Renvoie la taille de l'entrée du répertoire courant en octets.

Remarques

DirectoryEntrySize() renvoie un quad (8 octets) supportant les tailles de fichier supérieures à 4Go.

Exemple

 Repertoire$ = GetHomeDirectory()  ; Liste tous les fichiers et les dossiers du répertoire racine de l'utilisateur qui est actuellement logué (Home)
  If ExamineDirectory(0, Repertoire$, "*.*")  
    While NextDirectoryEntry(0)
      If DirectoryEntryType(0) = #PB_DirectoryEntry_File
        Type$ = " [Fichier] "
        Taille$ = " (Taille : " + DirectoryEntrySize(0) + ")"
      Else
        Type$ = " [Dossier] "
        Taille$ = "" ; Un Dossier n'a pas de taille
      EndIf
      
      Debug Type$ + DirectoryEntryName(0) + Taille$
    Wend
    FinishDirectory(0)
  EndIf

Voir aussi

ExamineDirectory(), NextDirectoryEntry(), DirectoryEntryType(), DirectoryEntryName(), DirectoryEntryAttributes(), DirectoryEntryDate()

OS Supportés

Tous