Fonctions Multilangue

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.

Aller à la page des exemples évolués

ChangeAlphabet (en anglais ChangeCharset)

// Passer la langue d'affichage
// de l'application en grec
Nation(27)
// Passer les polices en grec
ChangeAlphabet ( alphabetGrec )
// Re-afficher la fenêtre "Fenêtre1"
Utilise(FENETRE1)

Début de la page

ChangeAlphabet (en anglais ChangeCharset)

// Passer la langue d'affichage de
// du site en grec
Nation(27)
// Passer les polices en grec
ChangeAlphabet ( alphabetGrec )
// Re-afficher la page "Page1"
PageUtilise(FENETRE1)

Début de la page

ChangeClavier (en anglais ChangeKeyboard)

// Passer la langue d'affichage de
// l'application en grec
Nation(27)
// Passer les polices en grec
ChangeAlphabet( alphabetGrec )
// Re-afficher la fenêtre "Fenêtre1"
Utilise(FENETRE1)
// Change le clavier
ChangeClavier ( langueGrec )

Début de la page

ChangeSeparateur (en anglais ChangeSeparator)

-- code d'initialisation de projet
// Si la langue préférée de l'utilisateur est l'anglais
SI CookieLit("LANGUE_PREFEREE") = "ANGLAIS" ALORS
// on passe les libellés en anglais
Nation(3)
// on utilise le "." comme séparateur décimal
ChangeSéparateur ( sepDécimal , "." )
FIN

Début de la page

ChargeErreur (en anglais LoadError)

SI ChargeErreur ("ALLEMAND.WDM")>0 ALORS
Erreur("Fichier des messages en allemand non trouvé",...
"Les messages seront affichés en français")
FIN

Début de la page

MessTraduit (en anglais MessTranslate)

// Récupère et affiche le message 2100
// présent dans le code de la fenêtre "FenMenu"
Info ( MessTraduit ( FenMenu , 2100 ))

Début de la page

MessTraduit (en anglais MessTranslate)

// Récupère et affiche le message 2100
// présent dans le code
Info ( MessTraduit ( 2100 ))

Début de la page

Nation (en anglais Nation)

// Utiliser l'anglais ?
SI Nation () = 3 ALORS
Info("Welcome!")
SINON
Info("Bonjour!")

FIN

Début de la page

Nation (en anglais Nation)

-- Choix menu : &Fichier..&Langues..&Anglais
// Changement de langue par menu
Nation (3)
Utilise(MenuInt)

Début de la page

Nation (en anglais Nation)

-- Choix menu : &Fichier..&Langues..&Anglais
// Changement de langue par menu
Nation (3)
// Réaffichage de la page d'accueil
PageUtilise(PageAccueil)

Début de la page