SoundStatus()

Syntax

Ergebnis = SoundStatus(#Sound [, Kanal])

Ermittelt den aktuellen Status des Sounds.

Parameter

#Sound	Der zu verwendende Sound.
Kanal (optional)	Der zu verwendende Kanal. Dabei handelt es sich um den von den PlaySound() zurückgegebenen Wert, wenn das #PB_Sound_MultiChannel Flag verwendet wird.

Rückgabewert

Gibt den aktuellen Sound-Status zurück. Dies kann einer der folgenden Werte sein:

  #PB_Sound_Stopped: der Sound ist gestoppt.
  #PB_Sound_Playing: der Sound wird abgespielt.
  #PB_Sound_Paused : der Sound ist angehalten (pausiert).
  #PB_Sound_Unknown: der Sound befindet sich in einem unbekannten Status 
                     (es trat ein Fehler auf, als der Status ermittelt wurde).

Beispiel

  Procedure SelectStatus(Status)
    Select Status
      Case #PB_Sound_Stopped
        MessageRequester("Info", "Der Sound wurde gestoppt.")
        
      Case #PB_Sound_Playing
        MessageRequester("Info", "Der Sound wird abgespielt.")
        
      Case  #PB_Sound_Paused
        MessageRequester("Info", "Der Sound ist angehalten.")
        
      Case #PB_Sound_Unknown
        MessageRequester("Info", "Status unbekannt.")
        
      Default
        MessageRequester("Info", "Status unbekannt.")
        
    EndSelect
  EndProcedure

 InitSound()           ; Initialisieren des Sound-Systems
 UseOGGSoundDecoder()  ; Verwenden von Ogg-Dateien

 ; Lädt einen Sound aus einer Datei
 LoadSound(0, #PB_Compiler_Home +"Examples\3D\Data\Siren.ogg")
 ; Der Sound wird abgespielt
 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) ; Der Sound wird freigegeben
 End

Unterstützte OS

Alle