男孩 发表于 2008-5-6 00:53:33

新手的 一个问题 ？

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Date.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 197, 117, 193, 125)
$Input1 = GUICtrlCreateInput("", 35, 25, 131, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit

        EndSwitch
WEnd

不如我要在打开这个的时候在$Input1这个控件里等到系统时间   怎么写啊

[ 本帖最后由 男孩 于 2008-5-8 13:02 编辑 ]

孤天一日 发表于 2008-5-6 01:37:52

$Input1 = GUICtrlCreateInput("", 35, 25, 131, 21)
GUICtrlSetData(-1,@HOUR&':'&@MIN&':'&@SEC)

或者
#include <DateTimeConstants.au3>
$Time = GUICtrlCreateDate("", 35, 40, 75, 20,$DTS_TIMEFORMAT)

小三 发表于 2008-5-6 11:22:23

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Date.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 197, 117, 193, 125)
$Input1 = GUICtrlCreateInput("", 35, 25, 131, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
    Case $GUI_EVENT_CLOSE
            Exit
EndSwitch
GUICtrlSetData($Input1,@HOUR&':'&@MIN&':'&@SEC)
WEnd

是这个效果么
页: [1]
查看完整版本: 新手的 一个问题 ？