Retour à la page Delphi
dernière mise à jour le : samedi 03 juin 2000
Description du composant
Le composant ScruteDossier est un composant permettant d'explorer une arborescence de fichiers dans un disque.
Il permet par exemple la recherche des instances des fichiers répondant à un certain filtre portant sur le nom du fichier (les * et ? sont admis). Chaque fois qu'il trouve un fichier correspondant à ce filtre, il déclenche un événement. Ceci vous permet d'effectuer n'importe quelle traitement sur ces fichiers ou sur leur nom.
Un événement est également déclenché pour chaque dossier rencontré.
Les propriétés
Dossier est un string indiquant à partir d'où commence l'exploration des fichiers du disque.
Filtre indique quels sont les fichiers qui déclencheront l'événement OnFichier. (ex:: *.htm). Suite à une modif proposée par Xavier Powaga, on peut maintenant y mettre des filtres combinés du style "*.bmp;*.gif;*.jpg". Merci Xavier.
MaxPenetration indique la profondeur maximum de l'exploration. (n'a aucune influence si SousDossier est à false)
SousDosssier est un booléen indiquant si l'on veut pouvoir explorer les sous-dossiers.
Stop est une propriété permettant d'arrêter l'exploration (par exemple, dans l'événement OnFichier, si on a trouvé le fichier recherché, il suffit de faire Stop:=true pour arrêter l'exploration). Stop est remis à false par le composant au départ de son exploration.
Les événements
OnCreate est déclenché juste après sa création,
OnDossier est déclenché
dès qu'il tombe sur un dossier (le filtre n'a pas d'influence
sur le déclenchement ou non de cet événement).
Paramètres : Sender correspond au
composant lui même. Nom correspond au
nom du dossier trouvé.
OnFichier est déclenché
dès qu'il tombe sur un fichier qui est compatible avec
le filtre.
Paramètres : Sender correspond au
composant lui même. Nom correspond au
nom du fichier trouvé.
OnExecute est déclenché juste avant le début de l'exploration.
OnFinExecute est déclenché à la fin de l'exploration y compris lorsque l'on est sortie par stop:=true;
Les fonctions
Ces fonctions seront généralement utilisées au cours de l'exploration à l'intérieur de l'implémentation de l'événement OnFichier.
Function GetNomFichier: string; Renvoie le nom complet du dernier fichier trouvé.
Function GetNomFichierSimple: string; Renvoie le nom de ce même fichier mais sans le chemin.
Function GetCheminFichier: string; Renvoie le chemin de ce même fichier.
Function GetTailleFichier: LongInt; Renvoie la taille en Octet du dernier fichier trouvé.
Function GetDossier: string; Renvoie le dernier dossier trouvé.
function GetDateHeureFichier : TDateTime ; Renvoie la date et l'heure du dernier fichier trouvé. Pour exploiter un TDateTime, on peut utiliser la procédure Delphi DecodeDate qui scinde TDateTime en valeurs Année, Mois et Jour ou les fonctions Delphi DateToStr ou TimeToStr.
Chargement du composant
Télécharger le composant puis installez le (voir page installation des composants)
Test du composant
Pour tester et évaluer ce composant, après l'avoir installer, vous pouvez télécharger le source d'un programme exemple.