Alert the user of error without msgbox

[layer]

Here is an alternate way to alert the user of something, or an error...

Func _WinFlash($hWnd, $OptDelay = 500, $OptFlashes = 2);Thanks to Larry and JdeB
   $Dll = DllOpen("user32.dll")
   For $x = 1 To $OptFlashes
      DllCall($Dll, "int", "FlashWindow", "hWnd", $hWnd, "int", 1)
      Sleep($OptDelay)
   Next
   DllClose($Dll)
EndFunc  ;==>_WinFlash

_WinFlash(WinGetHandle("Windows Media Player"), 100, 10)

Although, if the $OptDelay is too short, then you may not sere all the flashes, but that's not anything major...

Thanks Larry and JdeB for there support...

Enjoy

[quaizywabbit]

Cool!!

[Wb-FreeKill]

ehh, how can i see what it's doing?, lol

[zcoacoaz]

how about this example...

Func _WinFlash($hWnd, $OptDelay = 500, $OptFlashes = 2);Thanks to Larry and JdeB
   $Dll = DllOpen("user32.dll")
   For $x = 1 To $OptFlashes
      DllCall($Dll, "int", "FlashWindow", "hWnd", $hWnd, "int", 1)
      Sleep($OptDelay)
   Next
   DllClose($Dll)
EndFunc ;==>_WinFlash

$GUI = GuiCreate ( "My Error GUI", 200, 200 )
GuiSetState ( )
_WinFlash($GUI, 100, 10)

[layer]

Even better:

Func _WinFlash($hWnd, $OptDelay = 500, $OptFlashes = 2);Thanks to Larry and JdeB
   $Dll = DllOpen("user32.dll")
   For $x = 1 To $OptFlashes
      DllCall($Dll, "int", "FlashWindow", "hWnd", $hWnd, "int", 1)
      Sleep($OptDelay)
   Next
   DllClose($Dll)
EndFunc;==>_WinFlash

$GUI = GuiCreate ( "My Error GUI", 200, 200 )
$blinkme = GUICtrlCreateButton("Click here to flash", 10, 10)
GuiSetState ( )
While 1 
    $get = GUIGetMsg()
    If $get = -3 then Exit
        If $get = $blinkme then _WinFlash($GUI, 100, 2)
        WEnd

Notice when you click the button, and on the TaskBar a tab is there for the GUI, notice how it flahses orange? That's whats supposed to happen...

[zcoacoaz]

on windows 9x or winxp with clasic style it flashes blue

[layer]

on windows 9x or winxp with clasic style it flashes blue

<{POST_SNAPBACK}>

Sick. What color is the Taskbar then...?

EDIT: Oops, grey

Edited April 2, 2005 by layer