B4A Library [B4X] [XUI] B4XComboBox - Cross platform ComboBox / Spinner

JonPM

Well-Known Member
Licensed User
In B4A designer I tried changing text color but it still shows black in the app. Bug?
 

peacemaker

Expert
Licensed User
B4X:
Public Sub IndexOf(value As String) As Int
    #if B4J
        For i = 0 To cmbBox.Items.Size - 1
            Dim item As String = cmbBox.Items.Get(i)
            If item = value Then Return i
        Next
    #Else If B4A
        Return cmbBox.IndexOf(value)
    #Else
        For i = 0 To mItems.Size - 1
            Dim item As String = mItems.Get(i)
            If item = value Then Return i
        Next
    #End If
    Return -1    'ignore
End Sub
 
Last edited:
Top