PureBasic

Bonjour à tous,

Afin d'afficher le titre du film, la position, le volume, je superpose des images sur une vidéo.

Les résultats n'est pas toujours le même :
- des fois l'image apparaît très bien au dessus du film
- d'autre fois elle clignote au rythme du timer.

Alors si vous avez une méthode plus fiable, ou si vous savez quel paramètres à régler pour bien avoir les images au dessus du film, je vous serais très reconnaissant.

Un indice : j'ai clôner le disque dur d'un PC pour le mettre sur un autre , puis installer les drivers et les effets son différents. Cela vient peut être de la carte vidéo ??????

Merci bien

Code : Tout sélectionner

If InitMovie() = 0
  MessageRequester("Error", "Can't initialize movie playback !", 0) 
  End
EndIf

MovieName$ = OpenFileRequester("Choose the movie to play", "", "Movie/Audio files|*.avi;*.mpg;*.asf;*.mp3;*.wav|All Files|*.*", 0)
If MovieName$
  If LoadMovie(4, MovieName$)
    
    OpenWindow(0, 100, 150, MovieWidth(4), MovieHeight(4), "PureBasic - Movie")
    AddWindowTimer(0,1,100)
    CreateImage(2,100,20)
    StartDrawing(ImageOutput(2))
      Box(0,0,100,20,$FF0000)
    StopDrawing()
   ImageGadget(1,200,200,100,20,ImageID(2))
    PlayMovie(4, WindowID(0))
     
    Repeat
    ; si besoin
    SetGadgetState(1,ImageID(2))
    Until WaitWindowEvent() = #PB_Event_CloseWindow
  Else
    MessageRequester("Error", "Can't load the movie...", 0)
  EndIf
EndIf

Ça fonctionne très bien sous Windows XP 32 bits, avec ou sans timer, avec ou sans "setgadgetstate()" et avec les avi et les mpg.

Tu peux mettre à jour tes pilotes de carte graphique et de carte mère, tu peux aussi réinstaller directX9 (Windows uniquement).

Si t'as une webcam et une imprimante-scanner, fais un essai en les débranchant ou en les désactivant dans le panneau de configuration. Tu peux aussi mettre leur pilote à jour.

Mesa.

en jouant dans un container ca marche mieux :

Code : Tout sélectionner

If InitMovie() = 0
  MessageRequester("Error", "Can't initialize movie playback !", 0) 
  End
EndIf

MovieName$ = OpenFileRequester("Choose the movie to play", "", "Movie/Audio files|*.avi;*.mpg;*.asf;*.mp3;*.wav|All Files|*.*", 0)
If MovieName$
  If LoadMovie(4, MovieName$)
    
    OpenWindow(0, 100, 150, MovieWidth(4), MovieHeight(4), "PureBasic - Movie")
    ContainerGadget(0,0,0,MovieWidth(4), MovieHeight(4))

    PlayMovie(4,GadgetID(0))

    Repeat
      StartDrawing(WindowOutput(0))
        DrawingMode(#PB_2DDrawing_Transparent)
        DrawText(10,10,MovieName$)
      StopDrawing()
    Until WindowEvent() = #PB_Event_CloseWindow
  Else
    MessageRequester("Error", "Can't load the movie...", 0)
  EndIf
EndIf

Merci les gars pour vos réponses.

Je suis étonné par le containergadget car effectivement cela fonctionne mieux.

N'hésitez pas si d'autre une réponse plus technique.

Je vais essayer de mettre mon drivers de CG à jour....

J'ai tout de même un bon scintillement du texte avec ce dernier code.

ReSalut

Ca marche !!!!

J'ai juste mis mon drivers de carte graphique à jour.

C'est la première fois que la mise à jour des drivers me résout un problème !

Merci encore pour cette piste.

Stef

PureBasic

Superposition d'image sur vidéo...la roulette russe

Superposition d'image sur vidéo...la roulette russe

Re: Superposition d'image sur vidéo...la roulette russe

Re: Superposition d'image sur vidéo...la roulette russe

Re: Superposition d'image sur vidéo...la roulette russe

Re: Superposition d'image sur vidéo...la roulette russe

Re: Superposition d'image sur vidéo...la roulette russe