Timer increases when mouse over

[nitekram]

I would like to add a login timer to a script, but have determined that something is not right with my code. Or something I need to add to my code to make it work the way I think it should work. Here is the example script - you must have a console to see the reaction, but I went ahead and added to the gui.

Anyway - run your mouse around in circles in the gui and see how time flys - how can I fix?

#include <GuiConstants.au3>

$time = 0

GUICreate("", 392, 316, -1, -1, BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))

$lableTime = GUICtrlCreateLabel($time, 50, 50,200,50)

GUISetState()

While 1
    $msg = GUIGetMsg()
        Select
        Case $msg = $GUI_EVENT_CLOSE
            ExitLoop
        EndSelect   
    
    
    $time += 1
    If Mod($time,1000) = 0 Then 
        ConsoleWrite($time & @CRLF)
    guictrlSetData($lableTime,$time)
    EndIf
    
WEnd

[Achilles]

#include <GuiConstants.au3>
Opt("GUIOnEventMode", 1)

GUICreate("", 392, 316, -1, -1, BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))
GuiSetOnEvent($GUI_EVENT_CLOSE, '_Exit')

$lableTime = GUICtrlCreateLabel(0, 50, 50,200,50)

GUISetState()

$time = TimerInit()
$index = 0

While 1
    If TimerDiff($time) > $index * 1000 Then
        $index += 1
        ConsoleWrite($time & @CRLF)
        GuictrlSetData($lableTime, TimerDiff($time) / 1000)
    EndIf
   
WEnd

Func _Exit() 
    Exit
EndFunc

I added a timer instead of just using the loop. I also set it to GuiEventMode()...

I'm guessing you're former problem had something to do with the GuiGetMsg(). I think that command waits a while and then goes past (returning $msg as 0 or something). But sometimes, if their is a message it will not pause at all when it gets to the GuiGetMsg() command. I hope that made some sense...

EDIT: Fixed tags

Edited October 27, 2007 by Piano_Man

[nitekram]

#include <GuiConstants.au3>
Opt("GUIOnEventMode", 1)

GUICreate("", 392, 316, -1, -1, BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))
GuiSetOnEvent($GUI_EVENT_CLOSE, '_Exit')

$lableTime = GUICtrlCreateLabel(0, 50, 50,200,50)

GUISetState()

$time = TimerInit()
$index = 0

While 1
    If TimerDiff($time) > $index * 1000 Then
        $index += 1
        ConsoleWrite($time & @CRLF)
        GuictrlSetData($lableTime, TimerDiff($time) / 1000)
    EndIf
   
WEnd

Func _Exit() 
    Exit
EndFunc

I added a timer instead of just using the loop. I also set it to GuiEventMode()...

I'm guessing you're former problem had something to do with the GuiGetMsg(). I think that command waits a while and then goes past (returning $msg as 0 or something). But sometimes, if their is a message it will not pause at all when it gets to the GuiGetMsg() command. I hope that made some sense...

EDIT: Fixed tags

That works - thanks.