Videos abspielen

1. offizieller Beitrag

    ich hab vor einen videoplayer zu schreiben, aber der anfang funktioniert nicht...

    [autoit]

    #include <AVIConstants.au3>
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("INR-Videoplayer", 392, 301, 192, 124)
    $Button1 = GUICtrlCreateButton("Vollbild", 32, 248, 49, 25, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("Video Laden", 120, 248, 73, 25, $WS_GROUP)
    $Avi1 = GUICtrlCreateAvi("No File", -1, 16, 8, 353, 233)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    WinMove("INR-Videoplayer","",0,0,@DesktopWidth,@DesktopHeight)
    Case $Button2
    $Fileopen = FileOpenDialog("Video laden...","","(*.avi)")
    GUICtrlSetData($Avi1,$Fileopen)
    EndSwitch
    WEnd

    [/autoit]
    Spoiler anzeigen
    [autoit]

    #include <GuiAVI.au3>
    $Form1 = GUICreate("INR-Videoplayer", 392, 301, 192, 124)
    $Button1 = GUICtrlCreateButton("Vollbild", 32, 248, 49, 25)
    $Button2 = GUICtrlCreateButton("Video Laden", 120, 248, 73, 25)
    $Avi1 = _GUICtrlAVI_Create ($Form1,"No File", -1, 16, 8, 353, 233)
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case -3
    Exit
    Case $Button1
    WinMove("INR-Videoplayer","",0,0,@DesktopWidth,@DesktopHeight)
    Case $Button2
    $Fileopen = FileOpenDialog("Video laden...","","(*.avi)")
    _GUICtrlAVI_Open($Avi1, $Fileopen)
    _GUICtrlAVI_Play($Avi1)
    EndSwitch
    WEnd

    [/autoit]


    So geht es, aber wenn du damit sowas wie den VLC machen willst, kannst du das gleich vergessen, das unterstüzt sowenige Formate, ich ahbe nue 2 avis von 300 oder so du unterstützt werden

    mfg. Jam00