LastElement()

Syntaxe

*Resultat = LastElement(Liste())

Le dernier élément de la liste devient l'élément courant.

Arguments

Liste()

La liste à utiliser.

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.
La valeur renvoyée par cette commande est un pointeur vers les données du dernier élément s'il existe.

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