Private cols(2) As Int
cols(0)=Colors.RGB(72, 61, 139)
cols(1)=Colors.Blue
Private gdw As GradientDrawable
gdw.Initialize("TOP_BOTTOM", cols)
Private jo As JavaObject
jo = gdw
jo.RunMethod("setCornerRadii", Array As Object(Array As Float(0, 0, 0, 0, 30dip, 30dip, 30dip, 30dip)))
lblTop.Background = gdw