Switch Problem, bräcuhte hifle

  • Brauche eure hilfe.Er zeigt mir nämlich an, das Endswitch kein Switch hat... Ich hab das doch darin ;(

    [autoit]

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

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

    Case $Abspielen
    If FileExists ( "C:\lieder.ini" ) Then
    If GUICtrlRead ( $Radio1 ) = $GUI_CHECKED Then
    $LiedPfad=IniRead ("C:\lieder.ini", "lieder", "Radio1Lied", "keines" )
    $a=SoundPlay ( $LiedPfad )
    Endif
    EndSwitch
    WEnd

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


    Vorher hat das so ausgesehen, habe nur etwas entfernt :

    [autoit]

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

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

    Case $Abspielen
    If FileExists ( @ScriptDir&"\lieder.ini" ) Then
    If GUICtrlRead ( $Radio1 ) = $GUI_CHECKED Then
    $LiedPfad=IniRead (@ScriptDir&"\lieder.ini", "lieder", "Radio1Lied", "keines" )
    $a=SoundPlay ( $LiedPfad )
    ElseIf GUICtrlRead ( $Radio2 ) = $GUI_CHECKED Then
    $LiedPfad=IniRead ( @ScriptDir&"\lieder.ini", "lieder", "Radio2Lied", "keines" )
    SoundPlay ( $LiedPfad )

    EndIf
    Else
    MsgBox ( 0, "Radios belegen", "Radios bitte vorher belegen" )
    EndIf
    EndSwitch
    WEnd

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

    Einmal editiert, zuletzt von Texos (19. Mai 2009 um 13:52)

  • das hätte ich auch geschrieben :) Aber wo ich es gerade sehe

    If FileExists ( @ScriptDir&"\lieder.ini" ) Then
    If GUICtrlRead ( $Radio1 ) = $GUI_CHECKED Then
    so etwas wird bei Tidy gelegentlich beanstandet, ich ändere das dann so dann ist er ruhig, ist das ok oder gibt es da eine andere Lösung.

    If FileExists ( @ScriptDir&"\lieder.ini" ) Then
    Sleep(5)
    If GUICtrlRead ( $Radio1 ) = $GUI_CHECKED Then

    Achtung Anfänger! :whistling:

    Betrachten des Quellcodes auf eigene Gefahr, bei Übelkeit,Erbrechen,Kopfschmerzen übernehme ich keine Haftung. 8o