by Md.Mafuzul Islam Mafuz (7 Submissions)
Category: Windows API Call/Explanation
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sun 26th January 2003
Date Added: Mon 8th February 2021
Rating: (1 Votes)
FLASH YOUR APPLICATION OR WINDOW
API Declarations
Private Declare Function FlashWindow Lib "user32" (ByVal hwnd As Long, ByVal bInvert As Long) As Long
'"""""""""""""""""""""""""""""""""
'FLASH YOUR APPLICATION OR WINDOW'
'MD.MAFUZUL ISLAM MAFUZ '
'WEB:www.mafuz.com '
'E-mail:[email protected] '
'BANGLADESH '
'"""""""""""""""""""""""""""""""""
'//IsIconic:The IsIconic function determines whether
'the specified window is minimized.
'//Flashwindow:The FlashWindow function flashes the
'specified window once.
'//isiconic( hWnd)>>Handle of the window
'//Flashwindow(hwnd>> Identifies the window to be flashed.
'The window can be either open or minimized
'//bInvert>> Specifies whether the window is
'to be flashed or returned to its original state. The
'window is flashed from one state to the other if this
'parameter is TRUE. If it is FALSE, the window is
'returned to its original state (either active or inactive).
'When an application is iconic, if this parameter is
'TRUE, the taskbar window button flashes active/inactive.
'If it is FALSE, the taskbar window button flashes
'inactive, meaning that it does not change colors.
'It flashes, as if it were being redraw, but it does not
'provide the visual invert clue to the user.
' )
Dim minimized As Boolean
minimized = IsIconic(Form1.hwnd)
'minimized variable holding the value
'whether the form is minimized(WindowState)
If minimized = True Then
Call FlashWindow(Form1.hwnd, 1)
End If
End Sub