Code: Select all
Gui, Video:New, -Caption +owndialogs +HwndVideo -dpiscale +E0x02000000 +E0x00080000, %Video%
;Gui, % "+" . WS_CLIPSIBLINGS := 0x04000000
Gui, color, black
Gui, margin, 0,0
Gui, Add, ActiveX, x0 y0 w%A_screenwidth% h%A_screenheight% vWMP, WMPLayer.OCX ;need to do screen size checks
WMP.uiMode := "none" ; no WMP controls
WMP.stretchToFit := 1 ; video is streched to the given activex range
WMP.enableContextMenu := 0 ; no reaction to right click in the video field
Gui, Show, x%A_screenwidth% hide, Player GUI
Media := WMP.newMedia("P:\WiseFiles\Games\Chase\Bits\#chase.mp4") ; create a new Media object
WMP.currentMedia := Media ; set the players 'currentMedia' object
WMP.controls.play ; play
sleep 800
Gui, show, x1920 y0 w%A_screenwidth% h%A_screenheight%