Programm mit 2 Liedern /MediaPlayern -> Error

[Poseidon]

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, MPlayer;

type
  TForm1 = class(TForm)
    MediaPlayer1: TMediaPlayer;
    MediaPlayer2: TMediaPlayer;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin

begin
mediaplayer1.AutoEnable:= true;
mediaplayer1.FileName:='C:\Dokumente und Einstellungen\Poseidon\Eigene Dateien\Eigene Musik\Lied1.mp3';
mediaplayer1.open;
mediaplayer1.Play;
end;

begin
mediaplayer2.AutoEnable:= true;
mediaplayer2.FileName:='C:\Dokumente und Einstellungen\Poseidon\Eigene Dateien\Eigene Musik\Lied2.mp3';
mediaplayer2.open;
mediaplayer2.Play;
end;
end;
end.

Hab den Code grade zusammengebastelt und der funtzt bei mir 1A. Wenns noch Fragen oder Probleme geben sollte sag einfach bescheid . Filename musst du natürlich auf deinen Wunsch umändern und im bei beiden Mediaplayer "Autoentable" auf False stellen.