inputmultilist

[Cor]

Dim myretList As List
Dim mylist As List

myretList.initialize
mylist.initialize

mylist.Add("1 item")
mylist.Add("2 item")
mylist.Add("3 item")
mylist.Add("4 item")


myretList=InputMultiList(mylist,"title")

activity.Title=myretList.Size ' number of items selected

how to get name of selected items or index of selected items which are checked or not checked?

grCor

 

[Erel]

Here is an example:

Sub Activity_Create(FirstTime As Boolean)
    Dim List1 As List
    List1.Initialize
    For i = 1 To 10
        List1.Add("Item #" & i)
    Next
    Dim result As List
    'no need to initialize it as it holds the list returned from InputMultiList
    result = InputMultiList(List1, "Select your favorite items")
    Dim s As String
    s = "Favorite items:"
    For i = 0 To result.Size - 1
        s = s & CRLF & List1.Get(result.Get(i)) 'result holds the positions
    Next
    Msgbox(s, "")
End Sub