..."Do" Schleife und "While 1" schleife

  • Hallo leute ,

    Ich hab ein Problem ^^

    BugFix hat mir was mit einer "Do" schelife gemacht ... (Danke nochmal;))

    Ich hatte aber schon ne "While 1" Schelife drin ...

    Beides im Script geht nicht ,warum fragt mich net ?! Wie kann ich des machen , das beides geht ......des eine ins andere schreiben geht nicht.

    Spoiler anzeigen
    [autoit]

    While 0
    GUICtrlSetData($Zeit1,@HOUR)
    GUICtrlSetData($Zeit2,@MIN)
    GUICtrlSetData($Zeit3,@SEC)
    GUICtrlSetData($Zeit5,@HOUR)
    GUICtrlSetData($Zeit6,@MIN)
    GUICtrlSetData($Zeit7,@SEC)

    $nMsg = GUIGetMsg()

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

    Switch $nMsg

    Case $VerzeichnisWaelen
    _SROexesuchen()
    Case $MenuItem3
    Exit
    Case $MenuItem4
    $starlol = ShellExecute ( @ScriptDir & "\Help.ini" )
    Case $Min
    WinSetState("SRO_Client","",@SW_SHOWMINNOACTIVE)
    Case $Hide
    WinSetState("SRO_Client","",@SW_HIDE)
    TrayTip( "","Silkroad ist gehided !" , 15 )
    Case $Max
    WinSetState("SRO_Client","",@SW_MAXIMIZE)

    case $Speichern123
    Global $frank1 = GUICtrlRead( $Combo1 )
    Global $frank2 = GUICtrlRead( $Combo2 )
    Global $frank3 = GUICtrlRead( $Combo3 )
    Global $frank4 = GUICtrlRead( $Combo4 )
    Global $frank5 = GUICtrlRead( $Combo5 )
    Global $frank6 = GUICtrlRead( $Combo6 )
    Global $frank7 = GUICtrlRead( $Combo7 )
    Global $Belegung1 = iniwrite( @scriptdir & "\Datei.ini" , "Taste1" , "" , $frank1 )
    Global $Belegung2 = IniWrite( @scriptdir & "\Datei.ini" , "Taste2" , "" , $frank2 )
    Global $Belegung3 = iniwrite( @scriptdir & "\Datei.ini" , "Taste3" , "" , $frank3 )
    Global $Belegung4 = IniWrite( @scriptdir & "\Datei.ini" , "Taste4" , "" , $frank4 )
    Global $Belegung5 = iniwrite( @scriptdir & "\Datei.ini" , "Taste5" , "" , $frank5 )
    Global $Belegung6 = IniWrite( @scriptdir & "\Datei.ini" , "Taste6" , "" , $frank6 )
    Global $Belegung7 = iniwrite( @scriptdir & "\Datei.ini" , "Taste7" , "" , $frank7 )
    TrayTip( "" , "Datein gespeichert" , 4 )

    Case $Start
    $startpath = IniRead( @scriptdir & "\Datei.ini" , "Silkroad Ordner", "Silkroad" , "" )
    run ( $startpath )

    Case $GUI_EVENT_CLOSE

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


    Exit
    EndSwitch
    WEnd

    [/autoit]
    Spoiler anzeigen
    [autoit]

    Do

    GUICtrlSetData($Zeit1,@HOUR)
    GUICtrlSetData($Zeit2,@MIN)
    GUICtrlSetData($Zeit3,@SEC)
    GUICtrlSetData($Zeit5,@HOUR)
    GUICtrlSetData($Zeit6,@MIN)
    GUICtrlSetData($Zeit7,@SEC)

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

    $msg = GUIGetMsg()
    _SetCounter()

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




    For $i = 0 To UBound($arBt) -1
    If $msg = $arBt[$i][0] Then
    $arCounter[$i][1] = 1
    $input = GUICtrlRead($arIn[$i][0])
    If $input = '' Then ContinueLoop
    If StringInStr($input, ':') Then
    $input = StringSplit($input, ':')
    $input = $input[1]*60 + $input[2]
    EndIf
    $arIn[$i][1] = $input * 60
    $arIn[$i][2] = _NowCalc()
    GUICtrlSetState($arBt[$i][0], $GUI_DISABLE)
    GUICtrlSetState($arBt[$i][1], $GUI_ENABLE)
    ElseIf $msg = $arBt[$i][1] Then
    GUICtrlSetState($arBt[$i][0], $GUI_ENABLE)
    GUICtrlSetState($arBt[$i][1], $GUI_DISABLE)
    GUICtrlSetData($arCounter[$i][0], '')
    GUICtrlSetData($arIn[$i][0], '')
    $arIn[$i][1] = 0
    EndIf
    Next
    Until $msg = $GUI_EVENT_CLOSE

    [/autoit]

    So sehen die "DO" & "WHILE 1" Schleifen aus ...

    Bitte helft mir ;)

  • Ich hab , dass beides geht ....

    ^^ geht aber net.

    Und wenn ich des ganze "DO" in while reintuhe kommt immer fehler ....

    Umgekehrt genau so.

    Wie war des mit "Adlibenable" ?!

    MfG <-