B4A Library Ripple Effect library

Erel said:

I've uploaded a new version to the first post. It is based on a newer version of the open source project: https://github.com/patrickpissurno/RippleEffect

Click to expand...

        Private p As Panel
        p.Initialize("p")
        clvStickers.Add(p,16%y,m.GetKeyAt(i))
        p.LoadLayout("clvStickers")
        p.Color = Colors.Transparent
        riple.Initialize(p,Colors.RGB(17,139,126),250,False)

Sub clvStickers_ItemClick (Index As Int, Value As Object)

It is simple to use it. See the included example.

Click to expand...

Dim jo As JavaObject = Label1.Parent
jo.RunMethod("setRippleDuration", Array(0))

morteza ariyan said:

other question is I want the ripple continue showing until I press the button

Click to expand...