Mediaplayer selber gemacht... hilfe bei einzelnen komponente

[Nalincah]

TrackBar rein, Max = 1000, Min = 0;

Delphi-Quellcode:

procedure TForm1.TrackBar1Change(Sender: TObject);
begin
  SetMPVolume(MediaPlayer1, TrackBar1.Position);
end;