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 les différents éléments du chemin d'un fichier.
|
||
// Déclaration des variables
ResExtension est une chaîne ResFichier est une chaîne ResRépertoire est une chaîne ResDisque est une chaîne CheminFichier est une chaîne // Sélection d'un fichier CheminFichier = "C:\MesRépertoires\Fichier.txt" // Récupération des différents éléments du chemin ResExtension= fExtraitChemin (CheminFichier, fExtension ) ResFichier = fExtraitChemin (CheminFichier, fFichier ) ResRépertoire = fExtraitChemin (CheminFichier, fRépertoire ) ResDisque = fExtraitChemin (CheminFichier, fDisque ) // Affichage des différents éléments du chemin Info("L'extension du fichier est : "+ResExtension+ RC +... "Le nom du fichier est : "+ResFichier+ RC +... "Le(s) répertoire(s) est(sont) : "+ResRépertoire+ RC +... "Le disque est : "+ResDisque)
|
||
Le code suivant permet d'afficher les différents éléments du chemin d'un fichier.
|
||
// Déclaration des variables
ResExtension est une chaîne ResFichier est une chaîne ResRépertoire est une chaîne CheminFichier est une chaîne = "\Mes Fichiers\Fichier.TXT" // Récupération des différents éléments du chemin ResExtension= fExtraitChemin (CheminFichier, fExtension ) ResFichier = fExtraitChemin (CheminFichier, fFichier ) ResRépertoire = fExtraitChemin (CheminFichier, fRépertoire ) // Affichage des différents éléments du chemin Info("L'extension du fichier est : "+ResExtension+ RC +... "Le nom du fichier est : "+ResFichier+ RC +... "Le(s) répertoire(s) est(sont) : "+ResRépertoire)
|