diff options
author | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-05-10 12:28:56 +0000 |
---|---|---|
committer | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-05-10 12:28:56 +0000 |
commit | c6da424a1508eae4538244b4d00ddf1f0436b1b7 (patch) | |
tree | 18a125cc8a590c0916811e47c912134278e92bb7 /Game/Code/Classes/UAudioPlaybackBase.pas | |
parent | 8af89b5940bd15b013e3f48536888e352eb1c43b (diff) | |
download | usdx-c6da424a1508eae4538244b4d00ddf1f0436b1b7.tar.gz usdx-c6da424a1508eae4538244b4d00ddf1f0436b1b7.tar.xz usdx-c6da424a1508eae4538244b4d00ddf1f0436b1b7.zip |
Volumes are floating point values (single) now. The range changed from [0 .. 100] to [0.0 .. 1.0]
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1081 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r-- | Game/Code/Classes/UAudioPlaybackBase.pas | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Game/Code/Classes/UAudioPlaybackBase.pas b/Game/Code/Classes/UAudioPlaybackBase.pas index f1fe26f9..0251b8e8 100644 --- a/Game/Code/Classes/UAudioPlaybackBase.pas +++ b/Game/Code/Classes/UAudioPlaybackBase.pas @@ -28,7 +28,7 @@ type procedure Play; procedure Pause; procedure Stop; - procedure FadeIn(Time: real; TargetVolume: integer); + procedure FadeIn(Time: real; TargetVolume: single); procedure SetPosition(Time: real); function GetPosition: real; @@ -39,8 +39,8 @@ type // function SetOutputDevice(Device: TAudioOutputDevice): boolean; function GetOutputDeviceList(): TAudioOutputDeviceList; - procedure SetAppVolume(Volume: integer); virtual; abstract; - procedure SetVolume(Volume: integer); + procedure SetAppVolume(Volume: single); virtual; abstract; + procedure SetVolume(Volume: single); procedure SetLoop(Enabled: boolean); procedure Rewind; @@ -149,13 +149,13 @@ begin Result := true; end; -procedure TAudioPlaybackBase.SetVolume(Volume: Integer); +procedure TAudioPlaybackBase.SetVolume(Volume: single); begin if assigned(MusicStream) then MusicStream.Volume := Volume; end; -procedure TAudioPlaybackBase.FadeIn(Time: real; TargetVolume: integer); +procedure TAudioPlaybackBase.FadeIn(Time: real; TargetVolume: single); begin if assigned(MusicStream) then MusicStream.FadeIn(Time, TargetVolume); |