Auteur: Patrick BikerExemples é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'ouvrir un fichier externe. Le fichier est ouvert en mode lecture/écriture. Le nom et le chemin du fichier sont sélectionnés avec la fonction fSélecteur .
|
||
|
// Déclaration des variables
NomCheminFichier est une chaîne IdFichier est un entier // Sélection du nom et du chemin du fichier NomCheminFichier = fSélecteur("", "", "Sélection d'un fichier externe",... "Fichier externe"+ TAB +"*.txt", "txt", fselCrée ) // Ouverture du fichier IdFichier = fOuvre (NomCheminFichier, foLectureEcriture ) // Affichage du message d'erreur si l'ouverture n'a pas été effectuée SI IdFichier = -1 ALORS Erreur(ErreurInfo( errMESSAGE )) SINON // Traitements dans le fichier ouvert ... // Fin de traitements FIN
|
||
Le code suivant permet d'ouvrir et/ou de créer un fichier externe. Le fichier est ouvert en mode lecture/écriture. Le nom et le chemin du fichier sont sélectionnés avec la fonction fSélecteur . Si le fichier existe déjà, ce fichier ne sera pas recréé (constante foCréationSiInexistant ).
|
||
|
// Déclaration des variables
NomCheminFichier est une chaîne IdFichier est un entier // Sélection du nom et du chemin du fichier NomCheminFichier = fSélecteur("", "", "Sélection d'un fichier externe", ... "Fichier externe"+ TAB +"*.txt", "txt", fselCrée ) // Ouverture du fichier IdFichier = fOuvre (NomCheminFichier, foLectureEcriture+foCréationSiInexistant ) // Affichage du message d'erreur si la création n'a pas été effectuée SI IdFichier = -1 ALORS Erreur(ErreurInfo( errMESSAGE )) SINON // Traitements dans le fichier ouvert ... // Fin de traitements FIN
|
||
Le code suivant permet d'ouvrir un fichier externe. Le fichier est ouvert en mode lecture/écriture.
|
||
|
// Déclaration des variables
NomCheminFichier est une chaîne IdFichier est un entier // Sélection du nom et du chemin du fichier NomCheminFichier = "C:\MesRépertoires\Fichier.txt" // Ouverture du fichier IdFichier = fOuvre (NomCheminFichier, foLectureEcriture ) // Affichage du message d'erreur si l'ouverture n'a pas été effectuée SI IdFichier = -1 ALORS Erreur(ErreurInfo( errMESSAGE )) SINON // Traitements dans le fichier ouvert ... // Fin de traitements FIN
|
||
Le code suivant permet d'ouvrir et/ou de créer un fichier externe. Le fichier est ouvert en mode lecture/écriture. Si le fichier existe déjà, ce fichier ne sera pas recréé (constante foCréationSiInexistant ).
|
||
|
// Déclaration des variables
NomCheminFichier est une chaîne IdFichier est un entier // Sélection du nom et du chemin du fichier NomCheminFichier = "C:\MesRépertoires\Fichier.txt" // Ouverture du fichier IdFichier = fOuvre (NomCheminFichier, foLectureEcriture+foCréationSiInexistant ) // Affichage du message d'erreur si la création n'a pas été effectuée SI IdFichier = -1 ALORS Erreur(ErreurInfo( errMESSAGE )) SINON // Traitements dans le fichier ouvert ... // Fin de traitements FIN
|
