Android Question Inputlist in b4x

[netsistemas]

how to show a modal selector in b4x (java and android) .
A simple list with 2 or more opcion

i doing the below code, but the first error for me is how set Mainform in b4x

            Dim r As List
            dim Linea1 as string, linea2 as string
                Dim m As Int
                r.Initialize
    Linea1= "opcion1"
    Linea2= "opcion 2"
      
                r.AddAll(Array As String(Linea1, Linea2))
              
                #if b4j
                  
                    Dim fx As JFX 'is necessare referenci jfx library'
                    m = fx.InputList(Main_O_WHATtoPut, r, "Seleccione ", "Productos", 0) 'me vs MainForm
                    If m >= 0 Then
                        'Log($"Selected item: ${items.Get(m)}"$)
                    Else
                        'Log("User didn't select any item.")
                    End If
                #else 'b4a'
                  
                    Dim x As id 'need reference id libreary'
                  
                    m = x.InputList1(r, "Opciones")
                #end if
          
                Select Case m
                    Case 0    '
                        'correcta la primera
                    Case 1 '
            'lo segundo'
                      
                    Case Else
                      
                End Select
      
            End If
            ..

i change to public a variable in main:

Sub Process_Globals
    Private fx As JFX
    Public MainForm As Form

End Sub

and put

m = fx.InputList(Main.MainForm   , r, "Seleccione el producto", "Productos", 0) 'me vs MainForm

instead
Main_O_WHATtoPut
but i think this is not the best solution

 

[Erel]

This is indeed not the best solution.

Best solution is to use B4XDialog + InputListTemplate.

 

[netsistemas]

Ok. Solved.
This is my finaly code:

Sub GetOpcion2k(Lineas As List ) As ResumableSub
    'wrap it with a timed template

    Dim Lista As List
    Lista.Initialize
    Dim Elemento As TD_ListaDuplicados
    Dim Cuenta As Long

    For Cuenta = 0 To Lineas.Size - 1
        Elemento  = Lineas.Get(Cuenta)
        Lista.Add ((Cuenta + 1) & " º " & Elemento.Producto  )
    Next
   
   
    options.Initialize
    options.Options = Lista ' Array(Linea1,Linea2)' Array("Cat", "Dog", "Fish", "Crocodile")
    options.AllowMultiSelection = False
    options.MultiSelectionMinimum = 1
   
   
    Dim TimedTemplate As B4XTimedTemplate
    TimedTemplate.Initialize(options)
    TimedTemplate.TimeoutMilliseconds = 30000 'close after 10 seconds (this is the default value)
    Wait For (Dialog.ShowTemplate(TimedTemplate, "OK", "", "CANCEL")) Complete (Result As Int)
    'If Result = xui.DialogResponse_Positive Then
    If  options.SelectedItem <> "" Then
        'Dialog.Show($"You selected: ${options.SelectedItems}"$, "OK", "", "")
        Dim IDLinea As Long
        IDLinea = options.SelectedItem.SubString2(0,1)
        Return Lineas.Get(IDLinea-1)
    Else
        Elemento.Initialize
        Return Elemento
    End If
End Sub

.....
           
            If Lineas.Size > 1 Then
                   
                Wait For (GetOpcion2k(Lineas)) Complete (Result As TD_ListaDuplicados)
            Else
                Result = Lineas.Get(0)
            End If
...

'in create activiy:
    Dialog.Initialize (Root)
    Dialog.Title = "Varios productos"

'and in class_globals:
Sub Class_Globals
   
    Private Dialog As B4XDialog
    Private options As B4XListTemplate

 

[marcoseinco]

This is indeed not the best solution.

Best solution is to use B4XDialog + InputListTemplate.

Do you have an example of that? I want to remove the inputList

 

[Mahares]

Do you have an example of that? I want to remove the inputList

In the first post of the below link by Erel there is an example for B4XInputList and B4XDialog. If you get stuck, post your code or project and come back. We will help you.

[B4X] XUI Views - Cross platform views and dialogs

XUI Views is a b4x library (https://www.b4x.com/android/forum/threads/100383/#content). The same b4xlib library is compatible with B4A, B4i and B4J It is a collection of custom views and dialogs. Everything is written in B4X. The source code is included inside the b4xlib file, which is a zip...

www.b4x.com

Note, the community prefers that you have created a new thread since the thread is a couple of years old.