SetRadialGradient corner radius

mariolu

Member
Licensed User
Longtime User
i am using this code for a backing of a panel, is it possible to set the radius so that round edges appear rather than corners, how would i modify the code.

Thanks in advance!!!



Sub Activity_Create(FirstTime As Boolean)
Dim GD As GradientDrawable
GD.Initialize("TOP_BOTTOM", Array As Int(Colors.White, Colors.Black))
activity.Background = gd
SetRadialGradient(GD, Activity.Height/2)
End Sub

Sub SetRadialGradient(GD As GradientDrawable, radius As Float)
Dim r As Reflector
r.Target = GD
r.RunMethod2("setGradientType", 1, "java.lang.int")
r.RunMethod2("setGradientRadius", radius, "java.lang.float")
End Sub
 
Top