Android Question Ripple effect on parent

Erel said:

You can use this code:

B4X:

Sub ActivateRipple(btn As Button)
   If GetType(btn.Background) = "android.graphics.drawable.RippleDrawable" Then
     Dim jo As JavaObject = btn.Background
     Dim x = btn.Width / 2, y = btn.Height / 2 As Float
     jo.RunMethod("setHotspot", Array(x, y))
     Dim sd As StateListDrawable 'ignore
     jo.RunMethod("setState", Array(Array As Int(sd.State_Pressed, sd.State_Enabled)))
     Sleep(200)
     jo.RunMethod("setState", Array(Array As Int(sd.State_Enabled)))
   End If
End Sub

Click to expand...

Sub SetRipple (v As View)
    Dim P As Phone
    If P.SdkVersion < 21 Then
        'Android version < 5.0 Lollipop -> StateListDrawable
        Dim PressedCD As ColorDrawable
        PressedCD.Initialize(Colors.Blue, 0)
        Dim DefaultCD As ColorDrawable
        DefaultCD.Initialize(Colors.Gray, 0)
        Dim bStateList As StateListDrawable
        bStateList.Initialize
        bStateList.AddState(bStateList.State_Pressed, PressedCD)
        bStateList.AddCatchAllState(DefaultCD)
        v.Background = bStateList
    Else
        'Android version >= 5.0 Lollipop -> RippleDrawable
        Dim bRipple As RippleDrawable
        bRipple.Initialize(Colors.White, Colors.Red)
        v.Background = bRipple.Drawable
       
    End If
End Sub

SetRipple(b.Parent)
ActivateRipple(b.Parent,3000, b.Top +b.Height/2)

Sub ActivateRipple(btn As View,x As Float, y As Float)
    If GetType(btn.Background) = "android.graphics.drawable.RippleDrawable" Then
        Dim jo As JavaObject = btn.Background
        jo.RunMethod("setHotspot", Array(x, y))
        Dim sd As StateListDrawable 'ignore
        jo.RunMethod("setState", Array(Array As Int(sd.State_Pressed, sd.State_Enabled)))
'        Sleep(200)
        jo.RunMethod("setState", Array(Array As Int(sd.State_Enabled)))
    End If
End Sub

Erel said:

The Sleep is required. If you use a version before 7.00 then you should move the last line to a different sub and call it with CallSubDelayed.

What is the problem? The hotspot?

Click to expand...

Erel said:

The coordinates you pass look wrong:

B4X:

ActivateRipple(b.Parent,3000, b.Top +b.Height/2)

I don't think that it is possible to change the animation duration.

Click to expand...

Erel said:

I've tested it with this code on Android 7:

B4X:

Sub ActivateRipple(btn As Button)
   If GetType(btn.Background) = "android.graphics.drawable.RippleDrawable" Then
     Dim jo As JavaObject = btn.Background
     Dim x = 2dip, y = 2dip As Float
     jo.RunMethod("setHotspot", Array(x, y))
     Dim sd As StateListDrawable 'ignore
     jo.RunMethod("setState", Array(Array As Int(sd.State_Pressed, sd.State_Enabled)))
     Sleep(200)
     jo.RunMethod("setState", Array(Array As Int(sd.State_Enabled)))
   End If
End Sub

The ripple does start from the top left corner.

The hotspot is only a hint to the system so it is possible that it doesn't do anything on older versions.

Click to expand...