Time - Showing Current Time In Gui

[nitekram]

Is there any command to show the current time (real time) in a GUI - do you have to put it in a while loop while calling the gui? I am at a loss and I have tried to do some searches and have not found what I am looking for, can someone please point me in the right direction.

[Geert]

#include <GUIConstants.au3>

GUICreate("My GUI") ; will create a dialog box that when displayed is centered
$LabelTime = GUICtrlCreateLabel("", 30, 30, 100)
GUISetState(@SW_SHOW)     ; will display an dialog box

; Run the GUI until the dialog is closed
While 1
    $msg = GUIGetMsg()
    GUICtrlSetData($LabelTime, @HOUR & ":" & @MIN & ":" & @SEC)
    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd

[GaryFrost]

this shouldn't have a flicker in it

#include <GUIConstants.au3>

GUICreate("My GUI") ; will create a dialog box that when displayed is centered
$now = @HOUR & ":" & @MIN & ":" & @SEC
$label = GUICtrlCreateLabel($now, 10, 10, 120, 20)
GUISetState(@SW_SHOW)     ; will display an empty dialog box

; Run the GUI until the dialog is closed
While 1
 $msg = GUIGetMsg()
 If $now <> @HOUR & ":" & @MIN & ":" & @SEC Then
  $now = @HOUR & ":" & @MIN & ":" & @SEC
  GUICtrlSetData($label, $now)
 EndIf
 
 If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd

[GaryFrost]

if you want 12 hour clock

#include <GUIConstants.au3>
#include <Date.au3>

GUICreate("My GUI") ; will create a dialog box that when displayed is centered
$now = _DateTimeFormat( _NowCalc(),3)
$label = GUICtrlCreateLabel($now, 10, 10, 120, 20)
GUISetState(@SW_SHOW)     ; will display an empty dialog box

; Run the GUI until the dialog is closed
While 1
 $msg = GUIGetMsg()
 If $now <> _DateTimeFormat( _NowCalc(),3) Then
  $now = _DateTimeFormat( _NowCalc(),3)
  GUICtrlSetData($label, $now)
 EndIf
 
 If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd

[nitekram]

this shouldn't have a flicker in it

#include <GUIConstants.au3>

GUICreate("My GUI"); will create a dialog box that when displayed is centered
$now = @HOUR & ":" & @MIN & ":" & @SEC
$label = GUICtrlCreateLabel($now, 10, 10, 120, 20)
GUISetState(@SW_SHOW)    ; will display an empty dialog box

; Run the GUI until the dialog is closed
While 1
 $msg = GUIGetMsg()
 If $now <> @HOUR & ":" & @MIN & ":" & @SEC Then
  $now = @HOUR & ":" & @MIN & ":" & @SEC
  GUICtrlSetData($label, $now)
 EndIf
 
 If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd

Thanks - did I miss is anywhere. I would like to read more on it. And that way also find more information on the macros. I find see them in the help section but it does not show you where to use it or how, or does that just come with knowledge. Thanks again for you quick help and time. You guys really are the best.

[GaryFrost]

Thanks - did I miss is anywhere. I would like to read more on it. And that way also find more information on the macros. I find see them in the help section but it does not show you where to use it or how, or does that just come with knowledge. Thanks again for you quick help and time. You guys really are the best.

Time and experience

yw