I see. This code no longer works. Apple has removed the access to the internal toolbar.
You can use this sub instead:
B4X:
Private Sub ChangeToolbarTintColor(clr As Int)
Dim no As NativeObject
no.Initialize("UIToolbar").RunMethod("appearance", Null) _
.RunMethod("setTintColor:", Array(no.ColorToUIColor(clr)))
End Sub
Thank Erel,
but it doesn't work for me... i followed your instraction and called the sub before loading the layout, but i continue to see the white toolbar...