FirstElement()

Syntaxe

Resultat = FirstElement(Liste())

Le premier élément de la liste spécifiée devient l'élément courant.

Arguments

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

Valeur de retour

Si la liste est vide alors la valeur de retour de cette fonction est 0. Elle peut donc être utilisée pour vérifier si une liste est vide ou non. Pour programmeurs expérimentés:
La valeur renvoyée par cette commande est un pointeur vers les données du premier élément ou zéro si le premier élément n'existe pas.

Exemple

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

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

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


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

  If FirstElement(nombres()) <> 0
    MessageRequester("Information", "La valeur du premier é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 FirstElement(nombres()) <> 0
    MessageRequester("Information", "La valeur du premier é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 = FirstElement(nombres())
  If *Element
    MessageRequester("Information", "La valeur du premier élément est "+Str(*Element\w), #PB_MessageRequester_OK)
  Else
    MessageRequester("Information", "La liste est vide", #PB_MessageRequester_OK)
  EndIf

OS Supportés

Tous