Discussion :

[TOTO32]

Bonjour a tous !

Avec la fonction FindFirst j'extrait la Date/Heure et la Taille de certains fichiers qui sont stocké dans une TListView, seulement voila, dans cette liste il n'y a pas que des fichiers, il y a aussi des repertoires, et quand je veut extraire des attributs de repertoire, il me renvoie juste la Date/Heure , mais pour la Taille il me renvoie 0, alors quand c'est un repertoire du type C:\WINNT, il y a un gros probleme, par ce que celui-ci ne fait pas 0 octets.

Voici la procedure qui extrait les attribut :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure TForm2.EnabledClick(Sender: TObject); 
var I: Integer; PropertyF: TSearchRec; 
begin 
    for I:=0 to ListView1.Items.Count-1 do 
    begin 
        if ListView1.Items[I].Selected then ListView1.Items[I].SubItems[1]:='Oui'; 
        if FindFirst(ListView1.Items[I].Caption,faAnyFile,PropertyF)=0 then 
        begin 
            Prop[I,0]:=PropertyF.Time; 
            Prop[I,1]:=PropertyF.Size; 
            FindClose(PropertyF); 
        end; 
    end; 
    Apply.Enabled:=True; 
end;

Nota : J'ai bien entendus essayer avec faAnyfile+faDirectory, et aussi avec faDirectory tout seul, et bien sur cela n'a rien donné, et il convient de dire que FindFirst me renvoie bien 0, étant donné que la Date/Heure est extraite.

Si je pourrais avoir de l'aide cela serait super sympa, merci a tous !

[Mac LAK]

Non, c'est normal. Un répertoire fait bien zéro octets de longueur, parceque ce n'est pas un fichier. Tu confonds avec la taille des données contenues dans ce répertoire.

Pour obtenir l'information que tu cherches, il te faut parcourir ton répertoire de manière récursive, et additionner toutes les tailles de tous les fichiers (et des fichiers des sous-répertoires).

Tu n'as pas remarqué que lorsque tu demandais la taille d'un gros répertoire à Windows (Clic droit -> propriétés), le résultat prenait souvent plusieurs secondes, et que tu voyais le chiffre augmenter au fur et à mesure ? C'est parceque Windows va justement "scanner" le répertoire pour obtenir cette information.

[TOTO32]

Merci pour ta réponse, et malheureusement je m'en doutais un peu, mais je voulais en être sur, surtout que scanner tout le repertoire et additionné toutes les tailles me demandera beaucoup de ressource systeme, alors je vais y reflechir a 2 fois.

[Pedro]

Merci pour ta réponse, et malheureusement je m'en doutais un peu, mais je voulais en être sur, surtout que scanner tout le repertoire et additionné toutes les tailles me demandera beaucoup de ressource systeme, alors je vais y reflechir a 2 fois.

Oh non pas tant que ça... Surtout si ce n'est que pour récupérer la taille des fichiers...
Ceci dit, un conseil: mets ce traitement dans un thread...

[Arrown]

Je vais surement dire une connerie car je n'est pas cherché sur le net.
Le fichier "Thumbs.db" de windows XP ne contiendrais pas cette information (je crois qu'il stocke la mise en forme de l'affichage du navigateur de répertoire mais pourquoi pas de l'espace).
Il suffirait de faire une recherche de ce fichier et si il 'existe pas, de faire ce que vous dite (parcours récursif).

Mais bon, je dis ca à l'arrache donc je ne sais pas ce que contient ce fichier.

[Pedro]

Euh je ne sais pas ce que contient ce fichier mais je ne vois pas pourquoi tu ne fais pas cette recherche... Elle n'est pas trop dure à mettre en place, même dans un thread...

[Arrown]

Je disais ça juste a titre d'info. car peut être que ce fichier sert "aussi" à ca, (peut être pas) et si oui, autant utiliser ce qui est prévu.

[Mac LAK]

Je disais ça juste a titre d'info. car peut être que ce fichier sert "aussi" à ca, (peut être pas) et si oui, autant utiliser ce qui est prévu.

A ma connaissance, il n'existe que s'il y a des images, c'est un cache pour les miniatures (thumbnails) qu'affiche Windows. Et tu n'es pas certain qu'il soit à jour, en plus.

[Pedro]

A ma connaissance, il n'existe que s'il y a des images, c'est un cache pour les miniatures (thumbnails) qu'affiche Windows. Et tu n'es pas certain qu'il soit à jour, en plus.

C'est aussi ce que je pensais... C'est moins casse-gueule de faire ton traitement... Ca marchera à coup sur...