LastElement()

Синтаксис

*Result = LastElement(List())

Описание

Устанавливает последний элемент Связного Списка List() в качестве текущего элемента.

Параметры

List()

Имя Списка, созданного с помощью функции NewList, текущий элемент которого будет изменён. Вы должны указать скобки после имени Списка.

Возвращаемое значение

Возвращает адрес в памяти нового текущего элемента Списка. При отсутствии элементов в Списке возвратом будет 0. Возвращаемое значение является указателем на новый текущий элемент.

Пример

; Пример простого использования
NewList Numbers.w()

AddElement(Numbers())
Numbers() = 5
AddElement(Numbers())
Numbers() = 8

LastElement(Numbers())
MessageRequester("Инфо", "Значение последнего элемента "+Str(Numbers()), #PB_MessageRequester_Ok)

;Пример, который использует возвращаемое значение LastElement()
NewList Numbers.w()

If LastElement(Numbers()) <> 0
    MessageRequester("Инфо", "Значение последнего элемента "+Str(Numbers()), #PB_MessageRequester_Ok)
Else
    MessageRequester("Инфо", "Список пуст", #PB_MessageRequester_Ok)
EndIf

AddElement(Numbers())
Numbers() = 5
AddElement(Numbers())
Numbers() = 8

If LastElement(Numbers()) <> 0
    MessageRequester("Инфо", "Значение последнего элемента "+Str(Numbers()), #PB_MessageRequester_Ok)
Else
    MessageRequester("Инфо", "Список пуст", #PB_MessageRequester_Ok)
EndIf

; Пример, который  использует указатели и предназначен для опытных пользователей
NewList Numbers.w()

AddElement(Numbers())
Numbers() = 5
AddElement(Numbers())
Numbers() = 8

*Element.Word = LastElement(Numbers())
If *Element
    MessageRequester("Инфо", "Значение последнего элемента "+Str(*Element\w), #PB_MessageRequester_Ok)
Else
    MessageRequester("Инфо", "Список пуст", #PB_MessageRequester_Ok)
EndIf

См. также

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

Поддерживаемые OS

Все