#Include <Date.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 633, 447, 193, 125)
$Label1=GUICtrlCreateLabel(_now(),100,220)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$OLDT=GUICtrlRead($Label1)
$NEWT=_now()
if $NEWT<>$OLDT Then GUICtrlSetData($Label1,$NEWT)
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
|