Sprite movie
Verfasst: 15.05.2010 09:50
hi Leute
ich habe gelesen das man movies in einem screen verwenden kann.Aber wie??
ich habe es schon mal ausprobiert. der ton geht auch aber das bild.
könnte vielleicht einer meine code berichtigen?
währe echt nett von euch!
Alex
ich habe gelesen das man movies in einem screen verwenden kann.Aber wie??
ich habe es schon mal ausprobiert. der ton geht auch aber das bild.
könnte vielleicht einer meine code berichtigen?
Code: Alles auswählen
;
InitKeyboard()
InitSprite()
If InitMovie() = 0
MessageRequester("Error", "Can't initialize movie playback !", 0)
End
EndIf
MovieName$ = OpenFileRequester("Choose the movie to play", "", "Movie/Audio files|*.avi;*.wmv;*.mpg;*.asf;*.mp3;*.wav|All Files|*.*", 0)
If MovieName$
If LoadMovie(0, MovieName$)
OpenScreen(1920, 1080,32, "PureBasic - Movie")
CreateSprite(1, 160, 90 )
RenderMovieFrame(0, SpriteID(1))
PlayMovie(0, SpriteID(1))
Repeat
RenderMovieFrame(0, SpriteID(1))
DisplaySprite(1,1,1)
ExamineKeyboard()
Until KeyboardPushed(#PB_Key_Escape)
Else
MessageRequester("Error", "Can't load the movie...", 0)
EndIf
EndIf Alex