diff options
| author | mogguh <mogguh@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-09-02 17:25:26 +0000 |
|---|---|---|
| committer | mogguh <mogguh@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-09-02 17:25:26 +0000 |
| commit | 7a01b05b3861a667eb32ce2e0fc88ff3bacb99ae (patch) | |
| tree | 3ceaf345e679ad993c5e1a78f9b5a84c1f0ac134 /src/classes/UMediaCore_SDL.pas | |
| parent | 4859734e7e6699e5c88added2df53ba3ff168300 (diff) | |
| download | usdx-7a01b05b3861a667eb32ce2e0fc88ff3bacb99ae.tar.gz usdx-7a01b05b3861a667eb32ce2e0fc88ff3bacb99ae.tar.xz usdx-7a01b05b3861a667eb32ce2e0fc88ff3bacb99ae.zip | |
Moved: The folder classes has been renamed to base
Updated: ultrastardx.dpr has been changed accordingly
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1339 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'src/classes/UMediaCore_SDL.pas')
| -rw-r--r-- | src/classes/UMediaCore_SDL.pas | 38 |
1 files changed, 0 insertions, 38 deletions
diff --git a/src/classes/UMediaCore_SDL.pas b/src/classes/UMediaCore_SDL.pas deleted file mode 100644 index 252f72a0..00000000 --- a/src/classes/UMediaCore_SDL.pas +++ /dev/null @@ -1,38 +0,0 @@ -unit UMediaCore_SDL; - -interface - -{$IFDEF FPC} - {$MODE Delphi} -{$ENDIF} - -{$I switches.inc} - -uses - UMusic, - sdl; - -function ConvertAudioFormatToSDL(Format: TAudioSampleFormat; out SDLFormat: UInt16): boolean; - -implementation - -function ConvertAudioFormatToSDL(Format: TAudioSampleFormat; out SDLFormat: UInt16): boolean; -begin - case Format of - asfU8: SDLFormat := AUDIO_U8; - asfS8: SDLFormat := AUDIO_S8; - asfU16LSB: SDLFormat := AUDIO_U16LSB; - asfS16LSB: SDLFormat := AUDIO_S16LSB; - asfU16MSB: SDLFormat := AUDIO_U16MSB; - asfS16MSB: SDLFormat := AUDIO_S16MSB; - asfU16: SDLFormat := AUDIO_U16; - asfS16: SDLFormat := AUDIO_S16; - else begin - Result := false; - Exit; - end; - end; - Result := true; -end; - -end. |