WMPlayer.OCX ohne Video?

    Hallo Leute,

    wie schaffe ich meinen Embedded Player ohne Video anzuzeigen?

    Embedded Windows Media Player (auch im Anhang)
    [autoit]

    #include <GUIConstants.au3>
    $gui = GUICreate("",250,255)
    $oMP = ObjCreate("WMPlayer.OCX")
    $mediaplayer = GUICtrlCreateObj($oMP, 5, 5, 300, 300)
    GUISetState(@SW_SHOW)
    With $oMP
    .fullScreen = True
    .windowlessVideo = False
    .enableContextMenu = True
    .enabled = True
    .uiMode = "full"
    .settings.autostart = True
    .settings.mute = False
    .settings.volume = 100
    .settings.Balance = 0
    .URL = "http://blackbeats.fm/listen.asx"
    EndWith

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

    While 1
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd

    [/autoit]

    ich will das das Radio ohne Video abgespielt wird...

    MfG

    Spoiler anzeigen


    Nur Navigationsmenü

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

    #include <GUIConstants.au3>
    $gui = GUICreate("",250,50)
    $oMP = ObjCreate("WMPlayer.OCX")
    $mediaplayer = GUICtrlCreateObj($oMP, 5, -200, 300, 300)
    GUISetState(@SW_SHOW)
    With $oMP
    .fullScreen = True
    .windowlessVideo = False
    .enableContextMenu = True
    .enabled = True
    .uiMode = "full"
    .settings.autostart = True
    .settings.mute = False
    .settings.volume = 100
    .settings.Balance = 0
    .URL = "http://blackbeats.fm/listen.asx"
    EndWith

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

    While 1
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd

    [/autoit]


    Ohne Gui

    [autoit]

    #include <GUIConstants.au3>
    #Include <Misc.au3>
    $oMP = ObjCreate("WMPlayer.OCX")
    $mediaplayer = GUICtrlCreateObj($oMP,0, 0, 0,0)

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

    GUISetState(@SW_SHOW)
    With $oMP
    .windowlessVideo = False
    .enableContextMenu = True
    .enabled = True
    .uiMode = "full"
    .settings.autostart = True
    .settings.mute = False
    .settings.volume = 100
    .settings.Balance = 0
    .URL = "http://blackbeats.fm/listen.asx"
    EndWith

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

    While Sleep(100)
    If _IsPressed("1B","user32.dll") Then Exit
    WEnd

    [/autoit]

    21 is only half the truth.

    Genau das:

    Ohne Video
    [autoit]

    #include <GUIConstants.au3>
    $gui = GUICreate("",250,50)
    $oMP = ObjCreate("WMPlayer.OCX")
    $mediaplayer = GUICtrlCreateObj($oMP, 5, -200, 300, 300)
    GUISetState(@SW_SHOW)
    With $oMP
    .fullScreen = True
    .windowlessVideo = False
    .enableContextMenu = True
    .enabled = True
    .uiMode = "full"
    .settings.autostart = True
    .settings.mute = False
    .settings.volume = 100
    .settings.Balance = 0
    .URL = "http://blackbeats.fm/listen.asx"
    EndWith

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

    While 1
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd

    [/autoit]

    wollte ich. Weiß du noch wie ich hinkrieg das wenn man auf Stop drückt das die Musik stoppt (bzw. der Stream)? Und bei Play wieder losgeht