Progressbar soll position des Mediaplayers anzeigen.

[Matze]

Ich habe es gerade getestet und bei mir funktioniert es ohne Probleme so:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  MediaPlayer1.Open;
  ProgressBar1.Max := MediaPlayer1.Length;

  MediaPlayer1.Play;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  ProgressBar1.Position := MediaPlayer1.Position;
end;

Welcher Dateityp wird abgespielt (MP3, WAV, MIDI, ...)?
Tritt das Problem bei allen Musikdateien auf?

Es könnte hilfreich sein, wenn du dein ganzes Projekt (den Quelltext, evtl. + Exe) anhängen würdest, damit man das mal selbst testen kann.