Changeset 352 for CoolAudio/UCoolAudio.pas

Timestamp:

Apr 23, 2012, 1:32:52 PM (12 years ago)

Author:

chronos

Message:

• Modified: Supported AudioSystems is configured using include config file.
• Added: Added playlist demo to Demo player.
• Added: Working DSP audiosystem for playing using linux /dev/dsp device. DSP backend support only WAV file so far.

File:

• CoolAudio/UCoolAudio.pas (modified) (2 diffs)

CoolAudio/UCoolAudio.pas

@@ -1 +1 @@
 unit UCoolAudio; 
 
+{$I UCoolAudioConfig.inc}
 {$mode Delphi}{$H+}
-
-{$IFDEF Windows}
-  {$DEFINE AudioSystemWindows}
-{$ENDIF}
-//{$DEFINE AudioSystemMPlayer}
-//{$DEFINE AudioSystemFMOD}
-//{$DEFINE AudioSystemDSP}
-{$IFDEF Linux}
-  //{$DEFINE AudioSystemMAD}
-{$ENDIF}
 
 interface
@@ -32 +23 @@
 
 AudioSystemManager := TAudioSystemManager.Create(nil);
-{$IFDEF AudioSystemWindows}
-AudioSystemManager.Register('Windows', TAudioSystemWindows, TPlayerWindows);
-{$ENDIF}
-{$IFDEF AudioSystemMPlayer}
-AudioSystemManager.Register('MPlayer', TAudioSystemMPlayer, TPlayerMPlayer);
-{$ENDIF}
-{$IFDEF AudioSystemFMOD}
-AudioSystemManager.Register('FMOD', TAudioSystemFMOD, TPlayerFMOD);
-{$ENDIF}
-{$IFDEF AudioSystemMAD}
-AudioSystemManager.Register('MAD', TAudioSystemMAD, TPlayerMAD);
-{$ENDIF}
-{$IFDEF AudioSystemDSP}
-AudioSystemManager.Register('DSP', TAudioSystemDSP, TPlayerDSP);
-{$ENDIF}
+{$IFDEF AudioSystemWindows}AudioSystemManager.Register('Windows', TAudioSystemWindows, TPlayerWindows);{$ENDIF}
+{$IFDEF AudioSystemMPlayer}AudioSystemManager.Register('MPlayer', TAudioSystemMPlayer, TPlayerMPlayer);{$ENDIF}
+{$IFDEF AudioSystemFMOD}AudioSystemManager.Register('FMOD', TAudioSystemFMOD, TPlayerFMOD);{$ENDIF}
+{$IFDEF AudioSystemMAD}AudioSystemManager.Register('MAD', TAudioSystemMAD, TPlayerMAD);{$ENDIF}
+{$IFDEF AudioSystemDSP}AudioSystemManager.Register('DSP', TAudioSystemDSP, TPlayerDSP);{$ENDIF}
 
 finalization