Changeset 389 for CoolAudio


Ignore:
Timestamp:
Jul 18, 2012, 2:08:08 PM (12 years ago)
Author:
chronos
Message:
  • Modified: Minor changes.
Location:
CoolAudio
Files:
6 edited

Legend:

Unmodified
Added
Removed

  • CoolAudio/Systems/FMOD/UAudioSystemFMOD.pas

    r353 r389  
    66interface
    77
     8{$UNDEF AudioSystemFMOD}
    89{$IFDEF AudioSystemFMOD}
    910uses

  • CoolAudio/Systems/UAudioSystem.pas

    r360 r389  
    8686  public
    8787    Driver: TMediaPlayerDriver;
     88    constructor Create(AOwner: TComponent); override;
     89    destructor Destroy; override;
    8890    procedure Play;
    8991    procedure Pause;
    … …  
    100102    property FileName: string read GetFileName write SetFileName;
    101103    property Active: Boolean read GetActive write SetActive;
    102     constructor Create(AOwner: TComponent); override;
    103     destructor Destroy; override;
    104104  end;
    105105
    … …  
    117117
    118118  TAudioSystemManager = class(TComponent)
     119  public
    119120    Systems: TObjectList; // TListObject<TAudioSystem>
    120121    procedure Register(Name: string; SystemClass: TAudioSystemClass);

  • CoolAudio/Systems/WinAPI/UAudioSystemWindows.pas

    r387 r389  
    6363  SMCIUnknownError = 'Unknown error code';
    6464
     65
    6566implementation
    6667

  • CoolAudio/Systems/mplayer/UAudioSystemMPlayer.pas

    r353 r389  
    2323
    2424  TAudioSystemMPlayer = class(TAudioSystem)
    25   private
     25  protected
    2626    FPath: string;
    2727    procedure SetOutputMode(AValue: TOutputDriver); override;
    … …  
    3737
    3838  TPlayerMPlayer = class(TMediaPlayerDriver)
    39   private
     39  protected
    4040    FProcess: TProcess;
    4141    FVolume: Real;

  • CoolAudio/UCoolAudio.pas

    r353 r389  
    22
    33{$I UCoolAudioConfig.inc}
     4
    45{$mode Delphi}{$H+}
    56

  • CoolAudio/UCoolAudioConfig.inc

    r352 r389  
    33  {$DEFINE AudioSystemMAD}
    44{$ENDIF}
    5 {$DEFINE AudioSystemFMOD}
     5{$IFDEF i386}
     6  {$DEFINE AudioSystemFMOD}
     7{$ENDIF}
    68{$DEFINE AudioSystemMPlayer}
    79{$IFDEF Windows}
Note: See TracChangeset for help on using the changeset viewer.