_NowDate help

[Riz]

I have got one button and input box, when the button pressed input box should get the today date and time, that date should remain when the script stops, until next pressed.

Any suggestion and advice is appreciated

this is my simple code

#include <GuiConstants.au3>
#Include <date.au3>

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

$Input_1 = GuiCtrlCreateInput("Input1", 70, 100, 140, 30)
$Button_2 = GuiCtrlCreateButton("Button2", 230, 100, 70, 30)

GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    case $msg = $Button_2
        GUICtrlSetData($Input_1, GUICtrlRead(_NowDate()))
    Case Else
    ;;;
    EndSelect
WEnd
Exit

[Xenobiologist]

Hi,

change the line to GUICtrlSetData($Input_1, _NowDate())

or to this to get the time, too GUICtrlSetData($Input_1, _NowDate())

So long,

Mega

Edited June 29, 2006 by th.meger

[Riz]

Hi,

change the line to GUICtrlSetData($Input_1, _NowDate())

or to this to get the time, too GUICtrlSetData($Input_1, _NowDate())

So long,

Mega

Thanks for your help. but is that bossible the time remain when the GUI close?

[randallc]

Hi,

Save it when you click?

;DateSave.au3
#include <GuiConstants.au3>
#Include <date.au3>
GuiCreate("MyGUI", 392, 316,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))
$Input_1 = GuiCtrlCreateInput("Input1", 70, 100, 140, 30)
$Button_2 = GuiCtrlCreateButton("Button2", 230, 100, 70, 30)
if FileExists(@ScriptDir&"\DateSaver.txt") then GUICtrlSetData($Input_1, FileReadLine(@ScriptDir&"\DateSaver.txt",1))
GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    case $msg = $Button_2
        FileDelete(@ScriptDir&"\DateSaver.txt")
        FileWrite(@ScriptDir&"\DateSaver.txt",_Now())
        GUICtrlSetData($Input_1, _Now())
    Case Else
    ;;;
    EndSelect
WEnd
Exit

Randallc

[EDIT: added "FileDelete(@ScriptDir&"\DateSaver.txt")"]

Edited June 30, 2006 by randallc

[Riz]

Thanks mate. That is great