-OpenDialog1 ist vom Typ
TOpenDialog
-MediaPlayer1 ist vom Typ
TMediaPlayer
Delphi-Quellcode:
procedure TForm1.Buttin1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
MediaPlayer1.FileName := OpenDialog1.FileName;
MediaPlayer1.Open;
MediaPlayer1.Play;
end;
end;
Wenn du das so verwendest, dürfte es eigentlich keine Prbleme geben.