Trouble with Full Screen Movies

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

Bruscella

I have the movies working correctly on Blitz3D in windowed mode, but I can see just a black screen in Full Screen Mode.
Anyone knows why?

Here's my simple PlayMovie function:

Function PlayMovie(movieName$)

ClsColor 0,0,0
SetBuffer(BackBuffer())

movie = OpenMovie(movieName$)
If movie = 0 Then RuntimeError movieName$ + " not found!"
If Not(MoviePlaying(movie)) Then RuntimeError "Error - Movie not playing!"

While (MoviePlaying(movie)) > 0 And (Not KeyHit(1))
Cls()
DrawMovie(movie, 0, 0, 640, 480)
Flip()
Wend

CloseMovie(movie)

End Function