WinWait Active - Set Timeout and Error in one location

[cfay]

Hello All,

I have written a fairly lengthy script that includes quite a few WinWaitActive commands. I had not added a timeout to any of the commands (which wouldn't be too big a deal to have to go back and do), but I am wondering if there is a way to have the script goto an onerror function (gathers some debug info before exiting) after the WinWait Timeout has been reached. I am looking for a way to NOT have to do the following for each instance:

$Result = WinWaitActive("WINDOW TITLE", "WINDOW TEXT ")

If ($Result = 0) Then

_FileWriteLog($TmpFolder & "\Install.log", "ERROR: TIMEOUT: Waiting For Window FAILED")

onerror()

Exit

Else

_FileWriteLog($TmpFolder & "\Install.log", "Window Found")

EndIf

Thanks in Advance,

-Chris

[PsaltyDS]

  cfay said:

Hello All,

I have written a fairly lengthy script that includes quite a few WinWaitActive commands. I had not added a timeout to any of the commands (which wouldn't be too big a deal to have to go back and do), but I am wondering if there is a way to have the script goto an onerror function (gathers some debug info before exiting) after the WinWait Timeout has been reached. I am looking for a way to NOT have to do the following for each instance:

$Result = WinWaitActive("WINDOW TITLE", "WINDOW TEXT ")

If ($Result = 0) Then

_FileWriteLog($TmpFolder & "\Install.log", "ERROR: TIMEOUT: Waiting For Window FAILED")

onerror()

Exit

Else

_FileWriteLog($TmpFolder & "\Install.log", "Window Found")

EndIf

Thanks in Advance,

-Chris

Just turn it into a UDF and use that in place of WinWaitActive():

_WinExpected("WINDOW TITLE", "WINDOW TEXT ", 120); Wait max 2min.

Func _WinExpected($sWinTitle, $sWinText, $iTimeout = 30)
    ; Default timeout = 30sec
    ; $TmpFolder must be globally declared
    Local $Result = WinWaitActive($sWinTitle, $sWinText, $iTimeout)
    If ($Result = 0) Then
        _FileWriteLog($TmpFolder & "\Install.log", "ERROR: TIMEOUT: Waiting For Window FAILED: " & $sWinTitle & "; " & $sWinText)
        onerror()
        Exit
    Else
        _FileWriteLog($TmpFolder & "\Install.log", "Window found active: " & $sWinTitle & "; " & $sWinText)
        Return 1
    EndIf
EndFunc ;==>_WinExpected

Edited June 3, 2009 by PsaltyDS

[cfay]

Very Clever Thank you that is a great idea, I will try that.

Thanks again,

-Chris