Spoiler anzeigen
Nur Navigationsmenü
#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
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Ohne Gui
[autoit]#include <GUIConstants.au3>
#Include <Misc.au3>
$oMP = ObjCreate("WMPlayer.OCX")
$mediaplayer = GUICtrlCreateObj($oMP,0, 0, 0,0)
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
While Sleep(100)
If _IsPressed("1B","user32.dll") Then Exit
WEnd