smooth sliding animation

[dualshock03]

kindly fix..

not working to what im expected..

i have a panel which in runtime would slide to show it.. but the animation seems not visible...

Dim intanimate As Integer
 Private Sub btn_delete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_delete.Click
       Me.Label7.Text = "Delete Criminal Record"
        PanelDelete.Visible = True

        For intanimate = 0 To 430 Step 1
            PanelDelete.Height = intanimate
            GroupBox1.Height = 198
            GroupBox1.Visible = True
        Next 

    End Sub

 

[Robert_Zenz]

Hello.

Your application ist stuck within this loop, and can't really apply the changes.
Add PanelDelete.Refresh() And/Or Application.Doevents() doy our loop, or consider using a Timer instead of the loop.

Bobby

 

[cjard]

Hello.

Your application ist stuck within this loop, and can't really apply the changes.
Add PanelDelete.Refresh() And/Or Application.Doevents() doy our loop

Noooo....

Using something called FormAnimation would be much better. Contact jmcilhinney (moderator) - he wrote some code a while ago that wraps the windows forms animation api calls, to amke this kind of thing (toast popup) easy. I'd give you the code but it's not mine to give.

 

[MattP]

Noooo....

Using something called FormAnimation would be much better. Contact jmcilhinney (moderator) - he wrote some code a while ago that wraps the windows forms animation api calls, to amke this kind of thing (toast popup) easy. I'd give you the code but it's not mine to give.

He's posted/updated the code here: Animated Window Effects with "Toast" popup demo - VBForums.

 

[dualshock03]

nice work!!