Android Question B4XComboBox TextColor in Cross Platform App - Android

[aminoacid]

I have created a Cross Platform Application using B4XPages and XUI which has a B4XComboBox. I can easily change the text color and background color of a B4XComboBox in the B4J app (in designer) and in the B4I app it can be changed but not directly. See:

B4XComboBox TextColor in Cross Platform App

Is there ANY way to change the awful blue text color in a B4XComboBox running in a B4I application on an iOS device. I have created a Cross Platform Application using B4XPages and XUI and I can easily change the text color and background color of the ComboBox in the B4A and B4J apps but not in...

www.b4x.com

However, I cannot find any way to change the TextColor of the B4XComboBox in the Android App. Changing it in designer has no effect at run time.

Any suggestions would be appreciated.

 

[Mahares]

Any suggestions would be appreciated

You can use CSBuilder to change the text color. See following thread:

Is it possible to change the color of individual items in a B4XComboBox?

I have a combo box that is populated by an sql statement. If a field is 1 I want the color of the item added to be Green, if it is 0 I want the color of the item to be white. I would prefer the background of each item to change colors but I will settle for just the text color of each item. Is...

www.b4x.com

 

[aminoacid]

You can use CSBuilder to change the text color. See following thread:

Is it possible to change the color of individual items in a B4XComboBox?

I have a combo box that is populated by an sql statement. If a field is 1 I want the color of the item added to be Green, if it is 0 I want the color of the item to be white. I would prefer the background of each item to change colors but I will settle for just the text color of each item. Is...

www.b4x.com

Nice! That worked. Thank you

 

[aminoacid]

One issue though, I can now set the text color fine:

Items.Add(cs.Initialize.Color(Colors.White).Append("Hello "& j).PopAll)

However when you pull down the list from the combobox, the background color is a light blue making it difficult to read the white text.
Can't figure out how to also change the background color to say "black". Setting it in designer only works for the initial item displayed in the box but not for the items displayed in the pull-down.

Thanks!

[edit]

I figured it out:

Items.Add(cs.Initialize.Color(Colors.White).BackgroundColor(Colors.Black).Append("Hello" & j).PopALL)

Only thing I don't like is that I get a "zebra stripe" effect in the pull-down - black bands with the white text and an empty white band between each one. I guess that's acceptable for now but it would be nice if the background color of the entire pulldown could be changed.

 

[Mahares]

Only thing I don't like is that I get a "zebra stripe" effect in the pull-down

I know that at the moment your main concern in America is Florida's hurricane Ian, but here is a complete example. There is no 'zebra stripe' effect.:

lstItems.Initialize
    Dim cs As CSBuilder
    lstItems.AddAll(Array As Object(cs.Initialize.Color(xui.Color_Red).Append("Dog").PopAll, _
    cs.Initialize.Color(xui.Color_Magenta).Append("Cat").PopAll, "Bird", "Camel", "Tiger", "Elephant", _
    cs.Initialize.Color(Colors.White).BackgroundColor(Colors.Black).Append("Hello aminoacid").PopALL))    
    B4XComboBox2.cmbBox.DropdownBackgroundColor =xui.Color_Black     
    B4XComboBox2.SetItems(lstItems)

 

[aminoacid]

I know that at the moment your main concern in America is Florida's hurricane Ian, but here is a complete example. There is no 'zebra stripe' effect.:

lstItems.Initialize
    Dim cs As CSBuilder
    lstItems.AddAll(Array As Object(cs.Initialize.Color(xui.Color_Red).Append("Dog").PopAll, _
    cs.Initialize.Color(xui.Color_Magenta).Append("Cat").PopAll, "Bird", "Camel", "Tiger", "Elephant", _
    cs.Initialize.Color(Colors.White).BackgroundColor(Colors.Black).Append("Hello aminoacid").PopALL))  
    B4XComboBox2.cmbBox.DropdownBackgroundColor =xui.Color_Black   
    B4XComboBox2.SetItems(lstItems)

Thank you @Mahares I'll try it out. Actually I live in Orlando and right now there's nothing to do but wait for Ian to arrive (and leave), so it's a good chance to get caught up on my B4X programming skills.


[EDIT] - Works perfectly now! Thanks again!