Movie im Open screen abspielen
Movie im Open screen abspielen
Hallo kann mir jemand sagen wie ich einen movie im open screen modus abspiele?
Danke Mark S.
Er wird aber nicht abgespielt
Code: Alles auswählen
If OpenScreen(ScreenWidth.l,ScreenHeight.l,ScreenDepth.l,"Movie Player") <> #FALSE
PlayMovie(0,ScreenID())
Danke Mark S.
also bei mir tut sich hier auch nix.
im fenster gehts aber problemlos.
c ya,
nco2k
Code: Alles auswählen
If InitSprite() And InitMovie() And InitKeyboard()
File.s = OpenFileRequester("", "", "*.*", 0)
If File And LoadMovie(0, File) And OpenScreen(640, 480, 16, "test")
ResizeMovie(0, 0, 640, 480)
PlayMovie(0, ScreenID())
Repeat
Delay(1)
ExamineKeyboard()
Until KeyboardPushed(#PB_Key_Escape)
EndIf
EndIf

c ya,
nco2k
~|__/
..o.o.. <--- This is Einkaufswagen. Copy Einkaufswagen into your signature to help him on his way to world domination.
..o.o.. <--- This is Einkaufswagen. Copy Einkaufswagen into your signature to help him on his way to world domination.