otra cosilla es el tema de controlar el volumen del stream o Channel
con un TrackBar podemos hacerlo, editamos su evento OnChange y:
C++Builder:
Código:
void __fastcall TForm1::sTrackBar1Change(TObject *Sender)
{
// Invertir el valor del TrackBar (esto es para que el maximo volumen quede a la derecha si el TrackBar->Orientation = Horizontal)
int valorInvertido = sTrackBar1->Max - sTrackBar1->Position;
int volumen = 100 - valorInvertido;
BASS_ChannelSetAttribute(stream, BASS_ATTRIB_VOL, 0.01 * volumen);
}
Delphi:
Código:
procedure TForm1.sTrackBar1Change(Sender: TObject);
var
valorInvertido: Integer;
volumen: Integer;
begin
// Invertir el valor del TrackBar
valorInvertido := sTrackBar1.Max - sTrackBar1.Position;
volumen := 100 - valorInvertido;
BASS_ChannelSetAttribute(stream, BASS_ATTRIB_VOL, 0.01 * volumen);
end;