sound datei abspielen wenn timer = 0

[Bastler]

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
If Opendialog1.Execute then
  begin
  Mediaplayer1.FileName:=Opendialog1.FileName;
  Mediaplayer1.Open;
  end;
end;

Edit: Du musst natürlich einen Opendialog zur Form hinzugefügt haben, so wie den Mediaplayer.