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

[JWest]

Ich habe gerede einen Mediaplayer gemacht, der tut auch aber
ich suche nach einer Lautstärkeregelung.
Gibt es eine und wenn, wie programmiere ich sie?

[fxbasic]

Wer chats erfunden? Die Chweizer...

http://www.swissdelphicenter.ch/de/showcode.php?id=618

Gruß, fxbasic

[JWest]

Danke, ich habs noch nicht getestet aber ich hoffe es geht

[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