problem mit wecker

1. offizieller Beitrag

    Hi leute,
    ich hab mal versucht nen wecker mit anderen funktionen zu schreiben...
    nun funktionier es mit der schleife die die zeit abfragt nich aber seht selbst:


    das hier ist die schleife... hab schon viele kombinationen ausprobiert und das hier is die letzte...

    [autoit][/autoit][autoit][/autoit][autoit]

    Func _StartWecker()
    $hour1 = GUICtrlRead ($Input1)
    $min1 = GUICtrlRead ($Input2)

    Do

    Sleep (100)

    Until $hour1 = @HOUR & $min1 = @MIN

    GUISetState (@SW_SHOW)
    EndFunc

    [/autoit]

    und hier das komplette skript... die schleife fängt bei 123 an

    Spoiler anzeigen
    [autoit]

    #cs ----------------------------------------------------------------------------

    [/autoit] [autoit][/autoit] [autoit]

    AutoIt Version: 3.2.12.1
    Author: Johann Lentz

    [/autoit] [autoit][/autoit] [autoit]

    Script Function:
    Template AutoIt script.

    [/autoit] [autoit][/autoit] [autoit]

    #ce ----------------------------------------------------------------------------

    [/autoit] [autoit][/autoit] [autoit]

    ; Script Start - Add your code below here

    [/autoit] [autoit][/autoit] [autoit]

    #include <date.au3>
    #include <GUIConstants.au3>

    [/autoit] [autoit][/autoit] [autoit]

    #Region ### START Koda GUI section ### Form=
    $Form2 = GUICreate("Wecker", 493, 332, 226, 244)
    $Label1 = GUICtrlCreateLabel("Wecker BetaPhase", 152, 16, 164, 28)
    GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
    $Button1 = GUICtrlCreateButton("Wecker", 48, 72, 75, 25, 0)
    $Button2 = GUICtrlCreateButton("CountDown", 208, 72, 75, 25, 0)
    $Button3 = GUICtrlCreateButton("Pc herunterfahren", 360, 72, 99, 25, 0)
    $Input1 = GUICtrlCreateInput("", 40, 152, 33, 21)
    $Input2 = GUICtrlCreateInput("", 80, 152, 33, 21)
    $Label2 = GUICtrlCreateLabel(":", 73, 152, 9, 28)
    GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
    $Button4 = GUICtrlCreateButton("Start", 40, 248, 75, 25, 0)
    $Button5 = GUICtrlCreateButton("Start", 208, 248, 75, 25, 0)
    $Button6 = GUICtrlCreateButton("Start", 368, 248, 75, 25, 0)
    $Input3 = GUICtrlCreateInput("", 207, 152, 33, 21)
    $Input4 = GUICtrlCreateInput("", 248, 152, 33, 21)
    $Label3 = GUICtrlCreateLabel(":", 240, 152, 9, 28)
    GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
    $Input5 = GUICtrlCreateInput("", 367, 152, 33, 21)
    $Input6 = GUICtrlCreateInput("", 409, 152, 33, 21)
    $Label4 = GUICtrlCreateLabel(":", 400, 152, 9, 28)
    GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
    $Group1 = GUICtrlCreateGroup("Wecker", 24, 56, 121, 241)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Group2 = GUICtrlCreateGroup("CountDown", 192, 56, 113, 241)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Group3 = GUICtrlCreateGroup("Herunterfahren", 352, 56, 113, 241)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    GUISetState(@SW_SHOW)
    GUICtrlSetState ( $Button4, $GUI_DISABLE)
    GUICtrlSetState ( $Button5, $GUI_DISABLE)
    GUICtrlSetState ( $Button6, $GUI_DISABLE)
    GUICtrlSetState ( $Input1, $GUI_DISABLE)
    GUICtrlSetState ( $Input2, $GUI_DISABLE)
    GUICtrlSetState ( $Input3, $GUI_DISABLE)
    GUICtrlSetState ( $Input4, $GUI_DISABLE)
    GUICtrlSetState ( $Input5, $GUI_DISABLE)
    GUICtrlSetState ( $Input6, $GUI_DISABLE)
    #EndRegion ### END Koda GUI section ###

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $Button1
    _Wecker()

    Case $Button2
    _CountDown()

    Case $Button3
    _Herunterfahren()

    Case $Button4
    GUISetState (@SW_HIDE)
    _StartWecker()
    SoundPlay ("Alarm.mp3")

    Case $GUI_EVENT_CLOSE
    Exit

    [/autoit] [autoit][/autoit] [autoit]

    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Func _Wecker()
    GUICtrlSetState ( $Button2, $GUI_DISABLE)
    GUICtrlSetState ( $Button3, $GUI_DISABLE)
    GUICtrlSetState ( $Button5, $GUI_DISABLE)
    GUICtrlSetState ( $Button6, $GUI_DISABLE)
    GUICtrlSetState ( $Input3, $GUI_DISABLE)
    GUICtrlSetState ( $Input4, $GUI_DISABLE)
    GUICtrlSetState ( $Input5, $GUI_DISABLE)
    GUICtrlSetState ( $Input6, $GUI_DISABLE)
    GUICtrlSetState ( $Input1, $GUI_ENABLE)
    GUICtrlSetState ( $Input2, $GUI_ENABLE)
    GUICtrlSetState ( $Button4, $GUI_ENABLE)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func _CountDown()
    GUICtrlSetState ( $Button1, $GUI_DISABLE)
    GUICtrlSetState ( $Button3, $GUI_DISABLE)
    GUICtrlSetState ( $Button4, $GUI_DISABLE)
    GUICtrlSetState ( $Button6, $GUI_DISABLE)
    GUICtrlSetState ( $Input1, $GUI_DISABLE)
    GUICtrlSetState ( $Input2, $GUI_DISABLE)
    GUICtrlSetState ( $Input5, $GUI_DISABLE)
    GUICtrlSetState ( $Input6, $GUI_DISABLE)
    GUICtrlSetState ( $Input3, $GUI_ENABLE)
    GUICtrlSetState ( $Input4, $GUI_ENABLE)
    GUICtrlSetState ( $Button5, $GUI_ENABLE)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func _Herunterfahren()
    GUICtrlSetState ( $Button1, $GUI_DISABLE)
    GUICtrlSetState ( $Button2, $GUI_DISABLE)
    GUICtrlSetState ( $Button4, $GUI_DISABLE)
    GUICtrlSetState ( $Button5, $GUI_DISABLE)
    GUICtrlSetState ( $Input1, $GUI_DISABLE)
    GUICtrlSetState ( $Input2, $GUI_DISABLE)
    GUICtrlSetState ( $Input3, $GUI_DISABLE)
    GUICtrlSetState ( $Input4, $GUI_DISABLE)
    GUICtrlSetState ( $Input5, $GUI_ENABLE)
    GUICtrlSetState ( $Input6, $GUI_ENABLE)
    GUICtrlSetState ( $Button6, $GUI_ENABLE)
    EndFunc

    Func _StartWecker()
    $hour1 = GUICtrlRead ($Input1)
    $min1 = GUICtrlRead ($Input2)

    Do

    Sleep (100)

    Until $hour1 = @HOUR & $min1 = @MIN

    GUISetState (@SW_SHOW)
    EndFunc


    Exit

    [/autoit]

    hoffe ihr könnt mir zeigen wie es geht... danke im vorraus...

    Einmal editiert, zuletzt von $User (3. Oktober 2008 um 21:49)