Abspielen einer sounddatei über Mediaplayer

[Maja Jessica]

Aha, gut.

Habe mal als Test:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Mediaplayer1.AutoEnable := true;
  Mediaplayer1.AutoOpen := true;
  Mediaplayer1.DeviceType := dtWaveAudio;
  MediaPlayer1.FileName := 'lach.wav';
  MediaPlayer1.Play;
end;

Die 'Lach.wav' im aktuellen Verzeichnis, klappt ohne zu murren.

Grüße, MJ