sponan hätte ich es so gemacht:
Delphi-Quellcode:
var
Filename: String;
begin
if OpenDialog1.Execute then
begin
Filename := OpenDialog1.Filename;
try
MediaPlayer1.Close;
except
end;
MediaPlayer1.Filename := Filename;
MediaPlayer1.Open;
end;
end;
wobei man schon prüfen sollte, ob gerade ein stück gespielt wird und dann erst handeln soll. es ist immer besser, auf fehler zu reagieren als sie zu ignorieren
was macht der code bei dir?