pictogram Auteur: Patrick Biker
Date: 18 mars 2006
Maj : 21 Mars 2015

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.

Revenir à la page des exemples évolués


Le code suivant permet de sauvegarder le contenu d'un champ image (ImageDessin) au format PNG. Le fichier PNG est sélectionné à l'aide de la fonction fSélecteur .

Pour cet exemple, nous considérons que le champ image (ImageDessin) contient une image ou plusieurs dessins.



-- Code clic sur BtnEnregistrer
// Déclaration des variables
CheminFichier est une chaîne
ResSauvegarde est un booléen
// Sélection du fichier PNG
CheminFichier = fSélecteur("C:\MesRépertoires", "", ...
                 "Sélectionnez un fichier", ...
                 "Fichier PNG (*.PNG)" + TAB + "*.PNG", "*.PNG", fSelCrée )
SI CheminFichier <> "" ALORS
   // Sauvegarde du contenu du champ image "ImageDessin"
   ResSauvegarde = dSauveImagePNG (ImageDessin, CheminFichier)
   // Sauvegarde effectuée ?
   SI ResSauvegarde = Vrai ALORS
     Info("La sauvegarde a été effectuée")
   SINON
     Erreur(ErreurInfo( errMESSAGE ))
   FIN
FIN