[Komponente] Bass Player Komponente: TBassDLLPlayer (+Demos)

[turboPASCAL]

TPlayerStatus = (sndStopped, sndPlaying, sndStalled, sndPaused, sndNotLoaded);

Delphi-Quellcode:

if BassdllPlayer1.Status in [sndStopped, sndStalled, sndPaused, sndNotLoaded] then;

if BassdllPlayer1.Status in [sndStopped, sndStalled] then;

if BassdllPlayer1.Status in [sndNotLoaded] then;

if BassdllPlayer1.Status in [sndPaused] then;

if BassdllPlayer1.Status in [sndPlaying] then;

// oder auch:
if BassdllPlayer1.Status = sndPlaying then;