Delphi-Quellcode:
if OpenDialog1.Execute then
TimerMusik.Enabled := False;
MediaPlayer1.Close;
MediaPlayer1.FileName := OpenDialog1.FileName;
MediaPlayer1.Open;
TimerMusik.Enabled := True;
TrackBarMusik.Max := MediaPlayer1.Length;
TrackBarMusik.Position := MediaPlayer1.Position;
Wie macht er die Position der TrackBar nicht? Diese bleibt bei 0 stehen.