Exemples évolués
Chaque exemple montre une utilisation pratique de la fonction du WLangage.
Quand plusieurs syntaxes sont possibles, chacune est illustrée indépendamment.
Le code suivant permet d'afficher dans une champ de type liste (ListeFichiers) l'ensemble des fichiers présents dans un répertoire spécifié.
|
||
--Code de clic sur BtnListeFichier
// Déclaration de la variable ResFichier est une chaîne // Les fichiers présents dans le répertoire "C:\MesRépertoires\MesFichiers" // sont affichés dans la liste "ListeFichiers" ResFichier = fRep ("C:\MesRépertoires\MesFichiers\*.*", frFichier ) TANTQUE ResFichier <> "" ListeAjoute(ListeFichiers, ResFichier) ResFichier = fRep ("", frFichier ) FIN
|
||
Le code suivant permet d'afficher dans une champ de type liste (ListeFichiers) l'ensemble des fichiers présents dans un répertoire spécifié.
|
||
--Code de clic sur BtnListeFichier
// Déclaration de la variable ResFichier est une chaîne // Les fichiers présents dans le répertoire "\MesRépertoires\MesFichiers" // sont affichés dans la liste "ListeFichiers" ResFichier = fRep ("\MesRépertoires\MesFichiers\*.*", frFichier ) TANTQUE ResFichier <> "" ListeAjoute(ListeFichiers, ResFichier) ResFichier = fRep ("", frFichier ) FIN
|