BassDllPlayer.Volume

**Sanguis**

Hallo,

ich spiele mit Hilfe der TBassDllPlayer Komponente einen Shoutcast Stream ab. Das abspielen klappt auch. Aber die Lautstärkeregelung funzt nicht. Ich hab folgenden Code:

markieren

Delphi-Quellcode:

			procedure TForm1.bsSkinSlider1Change(Sender: TObject);

begin

form1.BassdllPlayer1.Volume := func.IntToByte(form1.bsSkinSlider1.Value);

form1.Caption := IntToStr(form1.BassdllPlayer1.Volume);

end;

In func.IntToByte(int) steht folgendes:
Result := Math.Max(0, Math.Min(255, Value)); Aber leider klappt es nicht. BassdllPlayer1.Volume ergibt immer 0. Aber das stimmt auch nicht, ich höre Musik.

Gruß,
Andreas

BassDllPlayer.Volume

BassDllPlayer.Volume

Forumregeln