Array Sample

' These are samples for Array object and arrays.

' To set value to array

shape["shape"] = "Rectangle"  ' set value
shape["color"] = "Lime"       ' set value
TextWindow.WriteLine(shape)   ' shape=Rectangle;color=Lime;

' To get value from array

shape["color"] = "Lime"       ' set value
color = shape["color"]        ' get value
TextWindow.WriteLine(color)   ' Lime

' To remove value from array

shape["shape"] = "Rectangle"  ' set value
shape["color"] = "Lime"       ' set value
shape["color"] = ""           ' remove value
TextWindow.WriteLine(shape)   ' shape=Rectangle;

' ContainsIndex operation

param["x"] = 200
param["y"] = 100
If Array.ContainsIndex(param, "x") Then
  TextWindow.WriteLine(param["x"])  ' 200
EndIf

' ContainsValue operation

param["x"] = 200
param["y"] = 100
If Array.ContainsValue(param, 100) Then
  TextWindow.WriteLine("Array param has value 100.")  ' True
EndIf

' GetAllIndices operation

param["x"] = 200
param["y"] = 100
index = Array.GetAllIndices(param)
TextWindow.WriteLine(index) ' 1=x;2=y;

' GetItemCount operation

param = "x=200;y=100;width=300;height=150;"
num = Array.GetItemCount(param)
TextWindow.WriteLine("Array param has " + num + " items.")  ' 4

' IsArray operation

param = "x=200;y=100;width=300;height=150;"
If Array.IsArray(param) Then
  TextWindow.WriteLine("Array param is an array.")  ' True
EndIf

Popular Posts