SetValueElement_Sh

Синтаксис

Sub SetValueElement_Sh(ByVal list As Any Ptr ,ByVal element As integer32,ByVal value As Short )

Описание

Позволяет установить(изменить) значение типа Short для указанного элемента

Параметры

list - хендл списка

element - номер элемента

value - новое значение

Платформы

Windows , Linux

Пример

#Include "Linked_Lists.bi"
Sub PrintAllValue(list As Any Ptr)
  FirstElement(List)
  ? GetList_B(List)
  ? GetList_D(List)
  ? GetList_In(List)
  ? GetList_Sh(List)
  ? GetList_L(List)
  ? GetList_S(List)
  ? " "
End Sub
Var list=NewList()
' add and set values in the 1 item of the list
AddElement_B(List,4)
SetList_D(List,5.0303726547462)
SetList_In(List,7654321)
SetList_SH(List,4479)
SetList_L(List,12345678900000)
SetList_S(List,"11111")
' add and set values in the 2 item of the list
AddElement_B(List,2)
SetList_D(List,2.0303726547462)
SetList_In(List,2654321)
SetList_SH(List,2479)
SetList_L(List,22345678900000)
SetList_S(List,"22222")
'print values
PrintAllValue(list)
' change values 1 element
FirstElement(List)
SetValueElement_B(List,1,1)
SetValueElement_D(List,1,8.88888888888888)
SetValueElement_In(List,1,9999999)
SetValueElement_SH(List,1,5555)
SetValueElement_L(List,1,22222222222222222)
SetValueElement_S(List,1,"6666666")
'print values
PrintAllValue(list)
Sleep

Результат

4
5.0303726547462
7654321
4479
12345678900000
11111

1
8.88888888888888
9999999
5555
22222222222222222
6666666

Created with the Personal Edition of HelpNDoc: Easily create EPub books