Auteur: Patrick BikerDes 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.
ArbreAjoute (en anglais TreeAdd)
|
// Ajout de la feuille "Glace" dans le champ arbre "RecetteTV"
Res = ArbreAjoute (RecetteTV, "Recettes" + TAB + "Desserts" + TAB + "Glaces", ... aDéfaut , aDéfaut , IdFeuille)
|
ArbreCopieElement (en anglais TreeCopyItem)
|
// Copie la feuille "Ananas" dans le noeud "Entrées"
// dans le champ Arbre "RecetteTV" Res = ArbreCopieElément (RecetteTV, ... "Recettes" + TAB + "Desserts" + TAB + "Ananas", ... "Recettes" + TAB + "Entrées", aPremier )
|
ArbreDeplaceElement (en anglais TreeMoveItem)
|
// Déplacement de la feuille "Ananas" dans le noeud "Entrées"
// dans le champ Arbre "RecetteTV" Res = ArbreDéplaceElément (RecetteTV, ... "Recettes" + TAB + "Desserts" + TAB + "Ananas", ... "Recettes" + TAB + "Entrées", aPremier )
|
ArbreDeroule (en anglais TreeExpand)
|
// Déroule le noeud "Ananas" dans l'arbre "RecetteTV"
Res = ArbreDéroule (RecetteTV, ... "Recettes" + TAB + "Desserts" + TAB + "Ananas")
|
ArbreDerouleTout (en anglais TreeExpandAll)
|
// Déroule le noeud "Dessert" dans l'arbre "RecetteTV"
// Tous les éléments fils sont également déroulés Res = ArbreDérouleTout (RecetteTV, ... "Recettes" + TAB + "Desserts" )
|
ArbreEnroule (en anglais TreeCollapse)
|
// Enroule le noeud "Desserts" dans l'arbre "RecetteTV"
Res = ArbreEnroule (RecetteTV, ... "Recettes" + TAB + "Desserts")
|
ArbreEnrouleTout (en anglais TreeCollapseAll)
|
// Enroule le noeud "Desserts" dans l'arbre "RecetteTV"
Res = ArbreEnrouleTout (RecetteTV, ... "Recettes" + TAB + "Desserts")
|
ArbreEtat (en anglais TreeStatus)
|
// Etat du noeud "Desserts" dans l'arbre "RecetteTV"
ResEtat = ArbreEtat (RecetteTV, "Recettes" + TAB + "Desserts")
|
ArbreID (en anglais TreeID)
|
Résultat est un Booléen
Résultat = ArbreAjoute(Arbre1, "Racine"+ TAB +"Feuille", ... aDefaut , aDefaut, "Id unique feuille") Résultat = ArbreAjoute(Arbre1, "Racine"+ TAB +"Feuille", ... aDefaut , aDefaut, "Id unique feuille 2", aAccepteDoublon ) //suppression du 2 ème doublon ArbreSupprime(Arbre1, "Racine"+ TAB +"Feuille"+ArbreID("Id unique feuille 2"))
|
ArbreInfoXY (en anglais TreeInfoXY)
|
-- Code de clic sur l'arbre Arbre1
X, Y sont des entiers X = PoidsFaible(CurseurPos()) Y = PoidsFort(CurseurPos()) // Recherche du numéro de la ligne correspondant au clic Ligne est un entier = ArbreInfoXY (Arbre1, aiNUMLIGNE + aiOrigineEcran , X, Y) // Recherche du nom de la branche Branche est une chaîne = ArbreInfoXY (Arbre1, aiNOMBRANCHE + aiOrigineEcran , X, Y) Trace("Vous avez cliqué sur la branche "+Branche+"(ligne n°" + Ligne +")")
|
ArbreInsere (en anglais TreeInsert)
|
// Insertion de la feuille "Gâteaux" au même niveau que
// la feuille "Glaces" dans l'arbre "RecetteTV" // La feuille "Gâteaux" sera insérée avant la feuille "Glaces" Res = ArbreInsère (RecetteTV, "Recettes" + TAB + "Desserts" + TAB + "Glaces", ... "Gâteaux", aDéfaut , aDéfaut , NULL , aAvant )
|
ArbreListeFils (en anglais TreeListItem)
|
// Liste les "fils" du noeud "Desserts" dans l'arbre "RecetteTV"
// La procédure "DérouleTout" est appelée // pour chaque "fils" trouvé du noeud "Desserts" Res = ArbreListeFils (RecetteTV, "Recettes" + TAB + "Desserts", "DérouleTout")
|
ArbreModifie (en anglais TreeModify)
|
// Modification du libellé du noeud "Desserts" dans l'arbre "RecetteTV"
Res = ArbreModifie (RecetteTV, "Recettes" + TAB + "Desserts", ... "Desserts glacés")
|
ArbreOccurrence (en anglais TreeCount)
|
// Nombre d'éléments présents dans le noeud "Desserts"
// dans l'arbre "RecetteTV" ResNombre = ArbreOccurrence (RecetteTV, "Recettes" + TAB + "Desserts")
|
ArbrePosition (en anglais TreePosition)
|
// Nom du premier élément affiché dans l'arbre "RecetteTV"
ResNomElément = ArbrePosition (RecetteTV)
|
ArbreRecupereFils (en anglais TreeGiveChild)
|
// Premier "fils" du noeud "Desserts" dans le TreeView "RecetteTV"
Res = ArbreRécupèreFils (RecetteTV, "Recettes" + TAB + "Desserts", aPremier )
|
ArbreRecupereIdentifiant (en anglais TreeIdentifier)
|
// Renvoie l'identifiant du noeud "Desserts" dans l'arbre "RecetteTV"
Res= ArbreRécupèreIdentifiant (RecetteTV, "Recettes" + TAB + "Desserts")
|
ArbreSelect (en anglais TreeSelect)
|
// Chemin complet de l'élément sélectionné dans l'arbre "RecetteTV"
ResChemin = ArbreSelect (RecetteTV)
|
ArbreSelectPlus (en anglais TreeSelectPlus)
|
// Sélection du noeud "Desserts" dans l'arbre "RecetteTV"
Res = ArbreSelectPlus (RecetteTV, "Recettes" + TAB + "Desserts")
|
ArbreSupprime (en anglais TreeDelete)
|
// Suppression du noeud "Desserts" et de l'ensemble
// de ses "fils" de l'arbre "RecetteTV" Res = ArbreSupprime (RecetteTV, "Recettes" + TAB + "Desserts")
|
ArbreSupprimeFils (en anglais TreeDeleteChild)
|
// Suppression des fils du noeud "Desserts"
// de l'arbre "RecetteTV" Res = ArbreSupprimeFils (RecetteTV, "Recettes" + TAB + "Desserts")
|
ArbreSupprimeTout (en anglais TreeDeleteAll)
ArbreTrie (en anglais TreeSort)
|
// Tri des éléments présents dans l'arbre "RecetteTV"
// Tri alphabétiquement à partir du noeud "Desserts" Res = ArbreTrie (RecetteTV, "Recettes" + TAB + "Desserts", aAscendant )
|
ArbreTypeElement (en anglais TreeTypeItem)
|
// Type de l'élément "Desserts" dans le TreeView "RecetteTV"
Res = ArbreTypeElément (RecetteTV, "Recettes" + TAB + "Desserts")
|
