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 tracer un arc dans un champ image (ImageDessin). Divers champs de saisie (nommés X1, Y1, X2, Y2, X3, Y3, X4, Y4) permettent à l'utilisateur de saisir :

- les coordonnées du rectangle dans lequel le cercle sera inscrit,

- les coordonnées du point de départ et du point d'arrivée de l'arc de cercle.

La couleur de l'arc de cercle est sélectionnée par l'utilisateur à l'aide d'un champ sélecteur (SelectCouleur).



// Déclaration de la variable
CouleurArc est un entier
// Déclaration du dessin dans le champ image "ImageDessin"
dDébutDessin(ImageDessin)
// Récupération de la couleur sélectionnée
SELON SelectCouleur
    CAS 1 : CouleurArc = iRougeClair
    CAS 2 : CouleurArc = iBleuClair
    CAS 3 : CouleurArc = iVertClair
    CAS 4 : CouleurArc = iJauneClair
FIN
// Tracé de l'arc de cercle
dArc(X1, Y1, X2, Y2, X3, Y3, X4, Y4, CouleurArc)