LastElement()

Syntaxe

Resultat = LastElement(Liste())
Description
Le dernier élément de la liste devient l'élément courant.

Arguments

Liste() Le nom de la liste créée à l'aide de la commande NewList.
Les parenthèses sont obligatoires après le nom de la liste.

Valeur de retour

Renvoie l'adresse du dernier élément de la liste ou zéro s'il n'y a pas d'éléments.

Exemple

  ; Un exemple d'utilisation simple
  NewList nombres.w()

  AddElement(nombres())
  nombres() = 5
  AddElement(nombres())
  nombres() = 8

  LastElement(nombres())
  MessageRequester("Information", "La valeur du dernier élément est "+Str(nombres()), #PB_MessageRequester_OK)


  ; Un exemple qui utilise la valeur de retour
  NewList nombres.w()

  If LastElement(nombres()) <> 0
    MessageRequester("Information", "La valeur du dernier élément est "+Str(nombres()), #PB_MessageRequester_OK)
  Else
    MessageRequester("Information", "La liste est vide", #PB_MessageRequester_OK)
  EndIf

  AddElement(nombres())
  nombres() = 5
  AddElement(nombres())
  nombres() = 8

  If LastElement(nombres()) <> 0
    MessageRequester("Information", "La valeur du dernier élément est "+Str(nombres()), #PB_MessageRequester_OK)
  Else
    MessageRequester("Information", "La liste est vide", #PB_MessageRequester_OK)
  EndIf


  ; Un exemple réservé aux programmeurs expérimentés
  NewList nombres.w()

  AddElement(nombres())
  nombres() = 5
  AddElement(nombres())
  nombres() = 8

  *Element.Word = LastElement(nombres())
  If *Element
    MessageRequester("Information", "La valeur du dernier élément est "+Str(*Element\w), #PB_MessageRequester_OK)
  Else
    MessageRequester("Information", "La liste est vide", #PB_MessageRequester_OK)
  EndIf

Voir aussi

FirstElement(), PreviousElement(), NextElement(), SelectElement(), ListIndex()

OS Supportés

Tous

<- InsertElement() - LinkedList Index - ListIndex() ->