Des exemples d'utilisation des fonctions du WLangage
Rien de tel qu'un exemple pour comprendre une fonction de WLangage. Dans cette section, vous trouverez des exemples simples.
Des exemples évolués, où la fonction est utilisée en contexte, sont également disponible sur ce site.
PoliceCree (en anglais FontCreate)
// Création d'une police
MaPolice est une police MaPolice = PoliceCrée ("Arial", 12, iGras , iJauneClair ) // Utilisation de cette police dans le champ "NomClient" NomClient..Police = MaPolice
|
PoliceCree (en anglais FontCreate)
// Création d'une police normale
PNormal est une police = PoliceCrée ("Arial",12) // CRéation d'une police en gras PGras est une police = PoliceCrée ("Arial",12, iGras ) // Préparation de l'impression iApercu( iPDF ) // Parcours d'un tableau i est un entier POUR i = 1 A 100 // Utilisation de la police normale pour les // 50 premiers éléments du tableau SI nTab[i]>50 ALORS iPolice(PNormal) SINON // Utilisation de la police en gras pour les // 50 derniers éléments du tableau iPolice(PGras) FIN FIN // Lancement de l'impression iFinImprime()
|
PoliceListe (en anglais FontList)
PoliceSelect (en anglais FontSelect)
// Création d'une police par défaut
PDefaut est une police = PoliceCrée("Arial",12) // Utilisation d'une variable pour stocker la police de l'utilisateur PUtilisateur est une police // Demande à l'utilisateur de modifier sa police PoliceSelect (PUtilisateur, Vrai , PDefaut)
|