flashplayer

    hi
    http://flowplayer.org/ denn player find ich ganz cool ich würd denn gern im gui anzeigen lassen da is ja ein Embed code dabei komischer weise gehts nicht youtube megavideo myvideo player gehen aber der iwie nicht weiß einer warum? oder gibts andere coole player die flv abspielen die man im gui einbauen kann
    freue mich über jede antwort danke

    Auch ich habe meine Probleme das ganze umzusetzen. Per _IEcreateembedded() ist es ja (fast) kein Problem. Allerdings verlangt der IE eine Aktivierung des ActiveX Steuerelements, also dem Flashplayer. Der "Balken" zum aktivieren wird nur im Normalen IE Objekt, nicht aber im eingebundenen angezeigt. Also entweder Sicherheitseinstellungen des IE's umgehen, oder was anderes machen. Ich hab mich dann für "was anderes" entschieden.

    Meine Idee war, ein Flashobjekt einzubinden. Klappt auch super. Ich sehe den Player. Allerdings spielt er kein Video ab. Logisch - das abzuspielende Video muss ja auch noch an den player übermittelt werden. Und zwar über den Parameter ".flashvars" - und genau an dem haperts gerade bei mir.

    Spoiler anzeigen

    So sieht der Code aus, wenn ich ihn in eine HTML-Seite einbauen möchte. Funktioniert auch.

    Code
    ;~ <object width="460" height="320" data="http://flowplayer.org/swf/flowplayer-3.1.5.swf" type="application/x-shockwave-flash"><param name="movie" value="http://flowplayer.org/swf/flowplayer-3.1.5.swf" /><param name="allowfullscreen" value="true" /><param name="allowscriptaccess" value="always" /><param name="flashvars" value='config={"plugins":{"pseudo":{"url":"flowplayer.pseudostreaming-3.1.3.swf"},"controls":{"backgroundColor":"#000000","backgroundGradient":"low"}},"clip":{"provider":"pseudo","url":"http://e1p1.simplecdn.net/flowplayer/flowplayer-700.flv"},"playlist":[{"provider":"pseudo","url":"http://e1p1.simplecdn.net/flowplayer/flowplayer-700.flv"}]}' /></object>

    Hier der AutoIt Code. Bis auf das .flashvars klappts ja super:

    [autoit]

    #include <IE.au3>
    ;~ $VideoLink =
    $hGUI = GUICreate("Flashplayer",620,430)
    _CreateFlowPlayer()
    GUISetState()

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

    While GUIGetMsg() <> -3
    Sleep(10)
    WEnd

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

    Func _CreateFlowPlayer()
    $Flash = ObjCreate("ShockwaveFlash.ShockwaveFlash")
    $FlashObj = GUICtrlCreateObj($Flash, 0, 0, 600, 500)
    With $Flash
    .Movie = "http://flowplayer.org/swf/flowplayer-3.1.5.swf"
    .allowfullscreen = "true"
    .allowscriptaccess = "always"
    .flashvars = 'config={"clip":{"provider":"pseudo","url":"http://e1p1.simplecdn.net/flowplayer/flowplayer-700.flv"},"playlist":[{"provider":"pseudo","url":"http://e1p1.simplecdn.net/flowplayer/flowplayer-700.flv"}])'
    EndWith
    ;~ $Flash

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

    EndFunc

    [/autoit]

    Wäre super wenn jemand mit Flash/JavaScript erfahrung mal kurz drüberschauen könnte.
    Link zum Player ist der hier: http://flowplayer.org/index.html

    immer hin wird der player mit deinem script angezeigt das problemm liegt leider immernoch beim abspielen ich hab gestern nochn paar andere player gesucht die flv abspielen aber der flow player is iwie der coolste^^ ich hoffe uns kann da jmd weiter helfen

    ich hab mich nach nem anderem player umgesehen der gehfällt mir auch ganz gut dafür gibts auchn paar skins usw vllt gefällt dir auch SEuBo
    die funktion kannst du noch nach deinen wünschen anpassen der player in anpassbar und hat keine wasserzeichen unso

    die seite zum player ist http://www.getflvplayer.com

    Spoiler anzeigen
    [autoit]

    $ObjWidht = 560
    $ObjHeight = 340

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

    GUICreate("Test", $ObjWidht, $ObjHeight)
    $oIE = ObjCreate("Shell.Explorer.2")
    $oIE_ctrl = GUICtrlCreateObj($oIE, 0 - 13, 0 -17, $ObjWidht + 40, $ObjHeight + 40)
    GUISetState()
    _PlayerCreate("http://is5.myvideo.de/de/movie18/ba/5280828.flv")
    $oIE.Navigate(@ScriptDir & "\PlayerObject.htm")

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

    While 1
    Sleep(100)
    WEnd

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

    Func _PlayerCreate($VideoUrl, $Width = 560, $Height = 340, $Quality = "best", $Background = "http://www.team-r3.de/Bilder/wallpaper/1024/splash_1024.jpg", $Allowfullscreen = "true", $Autoplay = "false")
    Local $ObjectFilePath = @ScriptDir & "\PlayerObject.htm"

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

    $PlayerObject = '<script type="text/javascript"src="http://www.getflvplayer.com/templates/swfobject.js"></script>' & _
    '<span id="OB00982_content"style="border:1px solid #BBBBBB;color:white;background-color:white">GFP</span>' & _
    '<script type="text/javascript">var OB00982 = new SWFObject("http://www.getflvplayer.com/players/crystal.swf", "OB00982_movie", "' & $Width &'", "' & $Height & '", "9", "#000000");' & _
    'OB00982.addParam("quality", "' & $Quality & '");' & _
    'OB00982.addParam("salign", "t");' & _
    'OB00982.addParam("allowfullscreen", "' & $Allowfullscreen & '");' & _
    'OB00982.addParam("menu", "true");' & _
    'OB00982.addParam("allowscriptaccess", "always");' & _
    'OB00982.addVariable("autostart", "false");' & _
    'OB00982.addVariable("autoplay", "' & $Autoplay & '");' & _
    'OB00982.addVariable("file", "' & $VideoUrl & '");' & _
    'OB00982.addVariable("flv", "' & $VideoUrl & '");' & _
    'OB00982.addVariable("image","' & $Background & '");' & _
    'OB00982.addVariable("volume","100");' & _
    'OB00982.addVariable("showcontrols","true");' & _
    'OB00982.addVariable("bufferlength", "5");' & _
    'OB00982.write("OB00982_content");' & _
    '</script>'

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

    If FileExists($ObjectFilePath) Then FileDelete($ObjectFilePath)
    $ObjecFileOpen = FileOpen($ObjectFilePath, 0)
    FileWrite($ObjectFilePath, $PlayerObject)

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

    EndFunc

    [/autoit]