• Home
 · 
• Windows API Call/Explanation
 · 
• Flash a window using FlashWindow API

Flash a window using FlashWindow API

Flash a window using FlashWindow API

API Declarations


Private Declare Function FlashWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal wActive As Long) As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dMilliseconds As Long)




Rate Flash a window using FlashWindow API

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Dim i As Integer
Dim handle As Long ' Handle for the active window
Dim rval As Long
handle = GetActiveWindow()  'Get the handle of active window
For i = 1 To 10  ' Flash five times
rval = FlashWindow(handle, 1)  'Flash the window
Sleep 500  ' Delay the execution for 1/2 minute
Next
rval = FlashWindow(handle, 0) ' Bring the window to normal position
End Sub