iOS Question [SOLVED] B4XComboBox No showing the down arrow

WhiteWizard

Member
Licensed User
This is my second proyect with the B4XComboBox, and both of them have this problem. Look the pictures attached. Any help would be welcome.

Alejandro

thumbnail (1).png
thumbnail.png
 

angel_

Well-Known Member
Licensed User
Longtime User
You can add it like this:

B4X:
Sub AddArrow
    Dim lblArrow As Label
    
    lblArrow.Initialize("")
    lblArrow.Text = Chr(0xF107)
    lblArrow.Font = Font.CreateFontAwesome(B4XComboBox1.mBtn.TextSize)
    lblArrow.TextColor = Colors.Gray
    B4XComboBox1.mBase.AddView(lblArrow, B4XComboBox1.mBase.Width - 30dip, 0, 30dip, B4XComboBox1.mBase.Height)
End Sub
 

Attachments

  • TestCbo1.zip
    168.7 KB · Views: 102
Upvote 0

WhiteWizard

Member
Licensed User
Thank you Jose, muchas gracias.

B4X:
Sub AddArrowToComboBox(pB4XCombo As B4XComboBox,pColor As Int)
    Dim lblArrow As Label
    
    lblArrow.Initialize("")
    lblArrow.Text = Chr(0xF0d7)
    lblArrow.Font = Font.CreateFontAwesome(pB4XCombo.mBtn.TextSize)
    lblArrow.TextColor = pColor     'Colors.Gray
    pB4XCombo.mBase.AddView(lblArrow, pB4XCombo.mBase.Width - 30dip, 0, 30dip, pB4XCombo.mBase.Height)
End Sub
 
Upvote 0
Top