Hello,
I know how to make form fade in when the app is loaded but the question is how to make it fade out when the X button on caption/title bar is clicked or before the app is closed?
Thanks for help! :)
Printable View
Hello,
I know how to make form fade in when the app is loaded but the question is how to make it fade out when the X button on caption/title bar is clicked or before the app is closed?
Thanks for help! :)
I have used this in VB6 to achieve the effect you describe.
It works ok on win2000.
You'll have to translate it into .net though.
I got this sample from API-Guide
Code:Const AW_HOR_POSITIVE = &H1 'Animates the window from left to right. This flag can be used with roll or slide animation.
Const AW_HOR_NEGATIVE = &H2 'Animates the window from right to left. This flag can be used with roll or slide animation.
Const AW_VER_POSITIVE = &H4 'Animates the window from top to bottom. This flag can be used with roll or slide animation.
Const AW_VER_NEGATIVE = &H8 'Animates the window from bottom to top. This flag can be used with roll or slide animation.
Const AW_CENTER = &H10 'Makes the window appear to collapse inward if AW_HIDE is used or expand outward if the AW_HIDE is not used.
Const AW_HIDE = &H10000 'Hides the window. By default, the window is shown.
Const AW_ACTIVATE = &H20000 'Activates the window.
Const AW_SLIDE = &H40000 'Uses slide animation. By default, roll animation is used.
Const AW_BLEND = &H80000 'Uses a fade effect. This flag can be used only if hwnd is a top-level window.
Private Declare Function AnimateWindow Lib "user32" (ByVal hwnd As Long, ByVal dwTime As Long, ByVal dwFlags As Long) As Boolean
Private Sub Form_Load()
'KPD-Team 1999
'URL: http://www.allapi.net/
'E-Mail: [email protected]
'Set the graphic mode to persistent
Me.AutoRedraw = True
Me.Print "Unload me"
End Sub
Private Sub Form_Unload(Cancel As Integer)
'Animate the window
AnimateWindow Me.hwnd, 200, AW_VER_POSITIVE Or AW_HOR_NEGATIVE Or AW_BLEND
'Unload our form completely
Set Form1 = Nothing
End Sub
//set the timer interval to 110, for fadein, change the -.05 to +.05
private void tmrOpacity_Tick(object sender, System.EventArgs e)
{
this.Opacity -=.05;
}