Ich hab' das Problem, das ich gerne auf die System-Lautstärkeregelung des mediaplayers zugreifen möchte, es aber nicht hinbekomme! Kann mir vielleicht jemand helfen? Danke!

Guten Abend und herzlich willkommen in der DP!

In der Forum Suche (hier) hab ich unter Lautstärke einen Link zu dieser Page gefunden: Klick

Ich hoffe, sowas meinst du.

Man liest sich, Stanlay

Vielen Dank! Mußte nur den Aufruf etwas umschreiben damit ich die Lautstärke variabel verändern kann.

Für interessierte:
Alt :

markieren

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  SetMPVolume(MediaPlayer1, 500);
end;

Neu:

markieren

Delphi-Quellcode:

procedure TForm1.TrackBar1Change(Sender: TObject);
var lautstaerke, prozent: integer;
begin
 lautstaerke := TrackBar1.Position * 10;
 prozent := lautstaerke div 10;
 LblVol.Caption := IntToStr(prozent)+'%';
 SetMPVolume(MediaPlayer1, lautstaerke);
end;

MFG Wroblewski