diff options
| -rw-r--r-- | Game/Code/Classes/UMusic.pas | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/Game/Code/Classes/UMusic.pas b/Game/Code/Classes/UMusic.pas index db1675c5..f7f0e20d 100644 --- a/Game/Code/Classes/UMusic.pas +++ b/Game/Code/Classes/UMusic.pas @@ -342,7 +342,12 @@ end; procedure TMusic.SetVolume(Volume: integer);
begin
- BASS_SetVolume(Volume);
+ //Old Sets Wave Volume
+ //BASS_SetVolume(Volume);
+ //New: Sets Volume only for this Application
+ BASS_SetConfig(BASS_CONFIG_GVOL_SAMPLE, Volume);
+ BASS_SetConfig(BASS_CONFIG_GVOL_STREAM, Volume);
+ BASS_SetConfig(BASS_CONFIG_GVOL_MUSIC, Volume);
end;
procedure TMusic.SetLoop(Enabled: boolean);
|