Spanish [SOLUCIONADO]B4A- Seleccionar Item de spinner y poder enviarlo

[ferpahud]

Hola buenos días,

Agregue un spinner al mi diseño, el cual contiene los días del mes, para poder cargarlo uso lo siguiente:

For i=1 To 32
        spDia.Add(i)
Next

Pero cuando selecciono un día no se muestra, como hago para que quede seleccionado? Luego ese valor necesito cargarlo en una variable, como lo puedo tomar?

Muchas gracias!

 

[Gabriel Conti]

Hola

Sub spDia_ItemClick (Position As Int, Value As Object)
variable = spDia.SelectedItem
End Sub

 

[ferpahud]

Hola

Sub spDia_ItemClick (Position As Int, Value As Object)
variable = spDia.SelectedItem
End Sub

Muchas gracias!

 

[rscheel]

Ten en cuenta que de esta forma siempre tendrás que obligar al usuario a tener que seleccionar una opción en el spinner

Otra solución seria como el siguiente código

Sub Obtiene_Comandos
    Dim ListaComandos As List
    ListaComandos.Initialize
    s.BeginTransaction
    c = s.ExecQuery("SELECT * FROM comandos;")
    If c.RowCount <> 0 Then
        For i = 0 To c.RowCount-1
            c.Position = i
            spComando.Add(c.GetString("nombre")) 'Llenamos el Spinner
            ListaComandos.Add(c.GetString("comando")) 'Llenamos la Lista
        Next
    End If
    spComando.Tag = ListaComandos 'Pasamos la lista al tag del Spinner
    s.TransactionSuccessful
    s.EndTransaction
End Sub

y para rescatar el valor de la siguiente manera

Dim cbValorop As List
cbValorop = spComando.Tag
Valor = cbValorop.Get(spComando.SelectedIndex)'Guardamos el valor que se esta mostranto en el spinner

Espero te sirva, saludos.

 

[Santiago Russo]

Excelente!!!!!!