FirstElement()
Syntaxe
Resultat = FirstElement(Liste())Description
Le premier é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
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
Voir aussi
LastElement(), PreviousElement(), NextElement(), SelectElement(), ListIndex()
OS Supportés
Tous