Changeset 75 for trunk/Packages/CoolAudio/CoolAudio.pas

Timestamp:

Mar 26, 2024, 11:27:01 PM (8 months ago)

Author:

chronos

Message:

• Modified: Removed U prefix from CoolAudio package unit names.

File:

• trunk/Packages/CoolAudio/CoolAudio.pas (moved) (moved from trunk/Packages/CoolAudio/UCoolAudio.pas ) (4 diffs)

trunk/Packages/CoolAudio/CoolAudio.pas

@@ -1 @@
-unit UCoolAudio; 
+unit CoolAudio;
 
-{$I UCoolAudioConfig.inc}
-
-{$mode Delphi}{$H+}
+{$I CoolAudioConfig.inc}
 
 interface
@@ -9 +7 @@
 uses
   Classes, SysUtils,
-  {$IFDEF AudioSystemWindows}UAudioSystemWindows,{$ENDIF}
-  {$IFDEF AudioSystemMPlayer}UAudioSystemMPlayer,{$ENDIF}
-  {$IFDEF AudioSystemFMOD}UAudioSystemFMOD,{$ENDIF}
-  {$IFDEF AudioSystemMAD}UAudioSystemMAD,{$ENDIF}
-  {$IFDEF AudioSystemDSP}UAudioSystemDSP,{$ENDIF}
-  UAudioSystem;
+  {$IFDEF AudioSystemWindows}AudioSystemWindows,{$ENDIF}
+  {$IFDEF AudioSystemMPlayer}AudioSystemMPlayer,{$ENDIF}
+  {$IFDEF AudioSystemFMOD}AudioSystemFMOD,{$ENDIF}
+  {$IFDEF AudioSystemMAD}AudioSystemMAD,{$ENDIF}
+  {$IFDEF AudioSystemDSP}AudioSystemDSP,{$ENDIF}
+  AudioSystem;
 
 var
@@ -25 +23 @@
 
 uses
-  UPlayList;
+  PlayList;
 
 procedure Register;
@@ -43 +41 @@
 finalization
 
-AudioSystemManager.Free;
+FreeAndNil(AudioSystemManager);
 
 end.