SoundStatus()

Syntaxe

Resultat = SoundStatus(#Son [, Canal])

Renvoie l'état d'un Son.

Arguments

#Son	Le Son à utiliser.
Canal (optionnel)	Le canal à utiliser. C'est la valeur renvoyée par PlaySound() avec l'option #PB_Sound_MultiChannel.

Valeur de retour

Peut être une des valeurs suivantes:

  #PB_Sound_Stopped: Le son est arrêté.
  #PB_Sound_Playing: Le son est joué.
  #PB_Sound_Paused : Le son est en pause.
  #PB_Sound_Unknown: Le son est dans un état inconnu (une erreur s'est produite lors de l'obtention de l'état).

Exemple

  Procedure SelectStatus(Status)
    Select Status
      Case #PB_Sound_Stopped
        MessageRequester("Info", "Le son est arrêté.")
        
      Case #PB_Sound_Playing
        MessageRequester("Info", "Le son est joué.")
        
      Case  #PB_Sound_Paused
        MessageRequester("Info", "Le son est en pause.")
        
      Case #PB_Sound_Unknown
        MessageRequester("Info", "Statut inconnu.")
        
      Default
        MessageRequester("Info", "Statut inconnu.")
        
    EndSelect
  EndProcedure

 InitSound()           ; Initialisation des Sons
 UseOGGSoundDecoder()  ; Utilisation des fichiers ogg

 ; Chargement d'un son depuis un fichier
 LoadSound(0, #PB_Compiler_Home +"Examples\3D\Data\Siren.ogg")
 ; Le son joue en boucle
 PlaySound(0, #PB_Sound_Loop, 20)
 SelectStatus(SoundStatus(0))

 PauseSound(0)
 SelectStatus(SoundStatus(0))
 
 ResumeSound(0)
 SelectStatus(SoundStatus(0))
 
 StopSound(0)
 SelectStatus(SoundStatus(0))
 
 FreeSound(0) ; Le son est libéré
 End

Voir aussi

PlaySound(), StopSound(), PauseSound(), ResumeSound()

OS Supportés

Tous