A possible bug (or perhaps it's me overlooking something...)
I'm creating a state list:
B4X:
Dim DefaultDrawable, PressedDrawable As ColorDrawable
DefaultDrawable.Initialize(Colors.Green,55dip)
PressedDrawable.Initialize(Colors.Red,55dip)
Dim sld As StateListDrawable
sld.Initialize
sld.AddState(sld.State_Pressed, PressedDrawable)
sld.AddCatchAllState(DefaultDrawable)
Afterwards, I'm showing a dialog box:
B4X:
Dim rs As ResumableSub = Dialog.ShowCustom(contentsPanel, "Ok", "Abort", "Cancel")
Now I want to apply the StateList to the three buttons:
B4X:
Dim b As Button=Dialog.GetButton(xui.DialogResponse_Positive)
b.Background=sld
b=Dialog.GetButton(xui.DialogResponse_Negative)
b.Background=sld
b=Dialog.GetButton(xui.DialogResponse_Cancel)
b.Background=sld
What happens now is that when I click the first button, the color of the third button is changed as well. When I click the second button, the third button changes also.