DOCUMENTATION EN LIGNE
DE WINDEVWEBDEV ET WINDEV MOBILE

Aide / WLangage / Fonctions WLangage / Fonctions standard / Fonctions de gestion des fichiers externes / Procédures WLangage
  • Exemple de valeurs pouvant être prises par le paramètre
  • Interruption complète de la fonction fListeRépertoire
WINDEV
WindowsLinuxUniversal Windows 10 AppJavaEtats et RequêtesCode Utilisateur (MCU)
WEBDEV
WindowsLinuxPHPWEBDEV - Code Navigateur
WINDEV Mobile
AndroidWidget AndroidiPhone/iPadWidget IOSApple WatchMac CatalystUniversal Windows 10 App
Autres
Procédures stockées
Procédure WLangage appelée par la fonction fListeRépertoire
Procédure (également appelée "Callback") appelée par la fonction fListeRépertoire pour chaque fichier trouvé. Cette procédure peut être une procédure locale, globale ou interne.
Exemple
// Déclaration et initialisation des variables
 
// Nombre de répertoires répondant aux critères
NbRepertoireLS est un entier  
NbRépertoire est un entier = 0
CritèreRecherche est une chaîne
// Sélection du répertoire dans lequel les répertoires vont être listés
CritèreRecherche = fRepSélecteur("", "Sélectionner un répertoire", ...
"Recherche des répertoires cachés")
// Liste des répertoires
NbRepertoireLS = fListeRépertoire("C:\MesDocuments", "AttributRépertoire", ...
&NbRepertoireLS)
// Affichage du nombre de fichiers répondant aux critères
Info("Il y a " + NbRepertoireLS + " répertoires cachés sur " + ...
NbRépertoire + " répertoires listés")
// --------------------------------------------------------
// Procédure locale appelée par la fonction fListeRépertoire
PROCÉDURE AttributRepertoire(Répertoire, Nom, Change, NbRepertoire)
// Déclaration de la variable
NbRepertoireLS est un entier
// Répertoire caché ?
SI Position(fAttribut(Répertoire + Nom), "H") <> 0 ALORS
Transfert(&NbRepertoireLS, NbRepertoire, 4)
  NbRepertoireLS ++
  Transfert(NbRepertoire, &NbRepertoireLS, 4)
  // Affichage du nom du répertoire dans la liste "LISTE_ListeFichier"
  ListeAjoute(LISTE_ListeFichier, Répertoire + Nom)
FIN
RENVOYER Vrai
Syntaxe
<Résultat> = fListeRépertoire_Callback(<Chemin> , <Nom du répertoire> [, <Change> [, <Pointeur de la procédure>]])
<Résultat> : Booléen
  • Vrai pour continuer le parcours des fichiers,
  • Faux pour forcer l'interruption du parcours des fichiers.
<Chemin> : Chaîne de caractères
Chemin du répertoire manipulé (il contient toujours un "\" à la fin; par exemple, "C:\Mes Fichiers\").
<Nom du répertoire> : Chaîne de caractères
Nom du répertoire trouvé.
<Change> : Constante optionnelle de type Entier
Permet de savoir si un changement de répertoire a été effectué. Les valeurs possibles sont les suivantes :
flChangeRépertoireLe répertoire est le premier listé dans un sous-répertoire de <Chemin> (cela signifie qu'il y a eu changement de répertoire).
flRépertoireTous les autres cas.
<Pointeur de la procédure> : Entier optionnel
Valeur passée dans le paramètre <Pointeur> de la fonction fListeRépertoire. Si le paramètre <Pointeur> n'est pas précisé dans la fonction fListeRépertoire, <Pointeur de la procédure> vaut 0.
Pour récupérer la valeur du <Pointeur de la procédure>, affectez la valeur du <Pointeur de la procédure> à la valeur du <Pointeur> dans la procédure avec la fonction Transfert (voir Exemple détaillé accessible en haut de page).
Remarques

Exemple de valeurs pouvant être prises par le paramètre <Change>

Lors du parcours des fichiers listés par la fonction fListeRépertoire, voici les différentes valeurs pouvant être prises par <Change> :
Répertoire en cours<Change>
Rep\Répertoire 1flRépertoire
Rep\Répertoire nflRépertoire
Rep\SousRep 1\Répertoire 1flChangeRépertoire
Rep\SousRep 1\Répertoire mflRépertoire
Rep\SousRep 2\Répertoire 1flChangeRépertoire
Rep\SousRep 2\Répertoire xflRépertoire

Interruption complète de la fonction fListeRépertoire

Tant qu'il y a des fichiers à parcourir, la fonction fListeRépertoire ne peut pas être interrompue.
Pour forcer l'interruption du parcours complet, utilisez la ligne suivante dans la procédure :
RENVOYER Faux
Dans ce cas, la fonction fListeRépertoire retourne le nombre de répertoires parcourus jusqu'à l'appel de "Renvoyer Faux".
Dans les autres cas (pour poursuivre le parcours), la procédure <Nom de la procédure> DOIT renvoyer Vrai.
Si la procédure <Nom de la procédure> retourne aucune valeur (ni Vrai, ni Faux), une erreur est générée.
Composante : wd290std.dll
Version minimum requise
  • Version 10
Documentation également disponible pour…
Commentaires
Cliquez sur [Ajouter] pour publier un commentaire

Dernière modification : 25/05/2022

Signaler une erreur ou faire une suggestion | Aide en ligne locale