Help with adding timeout to button press

[PsychOfMSE]

So I have a program that updates software on an end user device.  When it comes time for a reboot it will utilize the following script:

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

$r = "2"
_main()

Func _main()
$MyGUI = GUICreate("Reboot Needed", 493, 120, 192, 114)
$Message = GUICtrlCreateLabel("Windows needs to reboot your system to complete system changes. Please save your work and click" & @CRLF & "Reboot. Or click Delay to Postpone the operation for 30 minutes. You may postpone " & $r & " more times.", 0, 8, 601, 75)
$Button1 = GUICtrlCreateButton("Reboot", 50, 70, 153, 41)
$Button2 = GUICtrlCreateButton("Delay", 300, 70, 137, 41)
GUISetState(@SW_SHOW)
While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg
  Case $GUI_EVENT_CLOSE
   _main()
  Case $Button1
    Shutdown(6)
  Case $Button2
   GUIDelete()
   _delay()
 EndSwitch
WEnd
EndFunc

Func _delay()
 $r -= 1
 Sleep(10000)
 _main()
EndFunc

What I need is a timeout on this box.  Say if the user doesn't select Reboot or Delay within 30 seconds it will default to rebooting the device.  Is this possible and if so how would I go about it?

Thanks!

[BrewManNH]

Look at TimerInit and TimerDiff in the help file and use that to determine when 30 seconds have passed.

[l3ill]

Needed something to do...

This is one way of going at it, the counter is not showing up correctly in the GUI for some reason... Blocked some semi invisible frame or something. . Not sure why but the rest works:

Edit: Fixed Thanks BrewmanNH  

expandcollapse popup

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Local $i
Local $label5
$r = "2"
_main()

Func _main()
$MyGUI = GUICreate("Reboot Needed", 493, 120, 192, 114)
$Message = GUICtrlCreateLabel("Windows needs to reboot your system to complete system changes. Please save your work and click" & @CRLF & "Reboot. Or click Delay to Postpone the operation for 30 minutes. You may postpone " & $r & " more times.", 0, 8, 601, 50)
$Button1 = GUICtrlCreateButton("Reboot", 50, 70, 153, 41)
$Button2 = GUICtrlCreateButton("Delay", 300, 70, 137, 41)
$label4 = GUICtrlCreateLabel( "Will Automatically reboot in: ", 120, 45, 130, 25)
$label5 = GUICtrlCreateLabel($i, 290, 45, 30, 20)
GUISetState(@SW_SHOW)

_30sec()
While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg
  Case $GUI_EVENT_CLOSE
   _main()
  Case $Button1
    Shutdown(6)
  Case $Button2
   GUIDelete()
   _delay()
 EndSwitch
WEnd
EndFunc

Func _30sec()

    For $i = 30 To 1 Step -1
        Sleep(1000)
        GUICtrlSetData($label5, $i)
        ConsoleWrite("$i =  " & $i & @CRLF)
        If $i = 1 Then
            ; Do whatcha gotta do...
            Endif
       Next
EndFunc

Func _delay()
 $r -= 1
 Sleep(10000)
 _main()
EndFunc

Edited December 3, 2013 by billo

[BrewManNH]

Taking billo's script as a starting point, I've boiled it down to one function that should do exactly what you need.

expandcollapse popup

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
_main()

Func _main()
     Local $nOldTimer = 0, $nDelay = 0
     $MyGUI = GUICreate("Reboot Needed", 493, 120, 192, 114)
     $Message = GUICtrlCreateLabel("Windows needs to reboot your system to complete system changes. Please save your work and click" & @CRLF & "Reboot. Or click Delay to Postpone the operation for 30 minutes. You may postpone " & $r & " more times.", 0, 8, 601, 50)
     $Button1 = GUICtrlCreateButton("Reboot", 50, 70, 153, 41)
     $Button2 = GUICtrlCreateButton("Delay", 300, 70, 137, 41)
     $label4 = GUICtrlCreateLabel("Will Automatically reboot in: ", 120, 45, 130, 25)
     $label5 = GUICtrlCreateLabel($i, 290, 45, 30, 20)
     GUISetState()

     $hTimer = TimerInit()
     While 1
          $nMsg = GUIGetMsg()
          Switch $nMsg
               Case $GUI_EVENT_CLOSE
                    ExitLoop
               Case $Button1
                    Shutdown(6)
               Case $Button2
                    If $nDelay < 2 Then
                         $hTimer = TimerInit()
                         $nDelay += 1
                    EndIf
          EndSwitch
          $nTimer = 30 - Int(TimerDiff($hTimer) / 1000)
          If $nTimer = 0 Then
               ; Do whatcha gotta do
          Else
               If $nTimer <> $nOldTimer Then
                    GUICtrlSetData($label5, $nTimer)
                    $nOldTimer = $nTimer
               EndIf
          EndIf
          Sleep(100)
     WEnd
     Exit
EndFunc   ;==>_main

BTW, don't use Local when declaring Global variables, declaring a Local variable in a Global scope doesn't make them local, they're Global.