Gibt es eine Lautstärkeregelung für d. Mediaplayer

[NikoMitDaMacht]

Willst du das eine TrackBar die lautstärke regelt dann:

Delphi-Quellcode:

procedure TForm1.TrackBar1Change(Sender: TObject); 
var
lautstärke : integer;
begin 
lautstärke:=trackbar1.position * 10;
  SetMPVolume(MediaPlayer1, lautstärke); 
end

müsste so gehen