Page 1 of 1

Movies in full-screen only sound (Windows 8)

Posted: Wed Jan 08, 2014 7:48 pm
by hth
OK: rendered movies are unfortunately history

But under Windows 8 now also movies in full-screen are not playable (only video sound).

Code: Select all

ExamineDesktops()  
wsc=DesktopWidth(0)
hsc=DesktopHeight(0)

InitMovie()
InitSprite()
InitKeyboard()

MovieName$ = OpenFileRequester("Choose the movie to play", "", "Movie files|*.avi;*.mpg|All Files|*.*", 0)
  
OpenScreen(wsc,hsc,32,"")

If MovieName$
  If LoadMovie(0, MovieName$)   
    
    PlayMovie(0,ScreenID())
      
    Repeat
    	ExamineKeyboard()     
    Until KeyboardPushed(#PB_Key_Escape)
  Else
    MessageRequester("Error", "Can't load the movie...", 0)
  EndIf
EndIf 
hth

Re: Movies in full-screen only sound (Windows 8)

Posted: Wed Jan 15, 2014 3:33 pm
by Tranquil
Sure it is not a codec problem on your machine?

Re: Movies in full-screen only sound (Windows 8)

Posted: Wed Jan 15, 2014 10:38 pm
by hth
Yes, in a window the videos are played correctly with pictures.

hth

Re: Movies in full-screen only sound (Windows 8)

Posted: Thu Jan 16, 2014 9:35 am
by Tranquil
I will give it a try when I'm back at home on my Windows 8.1 test machine.

Re: Movies in full-screen only sound (Windows 8)

Posted: Thu Jan 16, 2014 8:01 pm
by Tranquil
Confirmes. Just Sound, no video.

Re: Movies in full-screen only sound (Windows 8)

Posted: Thu Apr 28, 2016 4:11 am
by collectordave
PB 5-42LTS and windows 7

Movie plays in top left corner only not full screen and no sound!

All Solved. Resize movie and bigger windows!

Re: Movies in full-screen only sound (Windows 8)

Posted: Mon Jun 20, 2016 10:05 am
by Fred
PlayMovie() on a screen is not officially supported.

Re: Movies in full-screen only sound (Windows 8)

Posted: Tue Jun 21, 2016 6:55 am
by infratec
Hint:

borderless window

Re: Movies in full-screen only sound (Windows 8)

Posted: Tue Jun 21, 2016 7:54 am
by RASHAD
Change the depth to 16

Code: Select all

ExamineDesktops() 
wsc=DesktopWidth(0)
hsc=DesktopHeight(0)

InitMovie()
InitSprite()
InitKeyboard()

MovieName$ = OpenFileRequester("Choose the movie to play", "", "Movie files|*.avi;*.mpg|All Files|*.*", 0)
 
OpenScreen(wsc,hsc,16,"")

If MovieName$
  If LoadMovie(0, MovieName$)
  ResizeMovie(0,0,0,wsc,hsc)   
   
    PlayMovie(0,ScreenID())
     
    Repeat
       ExamineKeyboard()     
    Until KeyboardPushed(#PB_Key_Escape)
  Else
    MessageRequester("Error", "Can't load the movie...", 0)
  EndIf
EndIf