Case "GROW_ALPHA_SHADOW_AND_SHRINK"
mpleft = mb.Left
mptop = mb.Top
mpwidth = mb.Width
mpheight = mb.Height
mp.Color = Bit.AND(sclr(0),Colors.ARGB(80,255,255,255))
mp.SetLayoutAnimated(animtime, mb.Left-rSize, mb.Top - rSize, mb.Width + (2 * rSize), mb.Height + (2 * rSize))
Wait(animtime)
mp.Invalidate
mb.Invalidate
mp.SetLayoutAnimated(animtime, mpleft, mptop, mpwidth, mpheight)
mp.invalidate
mb.Invalidate