UpsKrn.ArbreBinaire.SuivantGroupe

Fonction SuivantGroupe(NumeroIterateur : Entier=0) Retourner Nul Ou TypeElement;

Description

La méthode SuivantGroupe fait avancer l'itérateur NumeroIterateur de l'arbre binaire à l'élément du groupe suivant défini par le critère. Par défaut, il s'agit de l'itérateur numéro 0. Le résultat est l'élément suivant de la liste.

Si l'arbre binaire est nul, il n'y a pas d'itérateur et le résultat est Nul.

Si NumeroIterateur est inférieure ou égale à zéro ou supérieure ou égale à quatre, alors l'exception IterateurInvalide est envoyée.

S'il n'y a plus d'élément suivant, alors l'exception SuivantImpossible est envoyée.

Exemple

/****************************************************************/
Fonction ComparerCaractere(C1 : Nul Ou Caractere, C2 : Nul Ou Caractere) Retourner ComparaisonObjet
/* Objet : Compare les caracteres. */
/****************************************************************/
Debut
Si C1==Nul Ou C2==Nul Alors
Fin Si
Si C1<C2 Alors
Fin Si
Si C1>C2 Alors Fin Si
Retourner ComparaisonEgal;
Fin Fonction

Principal
/*******/
Variable
/******/
Debut
/* Construction d'un arbre a trois éléments. */
A=ArbreBinaire(ComparerCaractere, Faux);
C="A";
A+=C;
A+="B";
A+=C;
/* Parcours de cet arbre. */
Pour C=A.ParcoursAuDebut() JusquA A.DernierElement() Pas A.SuivantGroupe() Faire Fin Pour
Fin Principal

Voir aussi

PrecedentGroupe pour reculer l'itérateur d'un arbre binaire à l'élément du groupe précédent.

Traduction

---------