Problem mit Abspielen von Song, außerhalb der Playlist

[DelphiUser7]

Hier noch mal zur Kontrolle: Der bereinigte Quelltext von 'Play-Button':

Delphi-Quellcode:

procedure TForm1.Play1Click(Sender: TObject);
begin
  If Mediaplayer1.Mode = mpOpen then
    Mediaplayer1.close;
    begin
    Mediaplayer1.FileName := PlayList1.Items.String [PlayList1.ItemIndex];
    SongPanel.Caption := Mediaplayer1.FileName;
    Mediaplayer1.Open;
    Mediaplayer1.Play;
    Timer1.Enabled := True;
   end;
  begin
   Mediaplayer1.Open;
   Mediaplayer1.Play;
   Mediaplayer1.FileName := FileLoad1.FileName;
   Timer1.Enabled := True;
  end;
end;

;

Könntest du vielleicht mal gucken, ob da nicht irgendwo noch ein begin und/oder end fehlt, denn mit diesem meiner Meinung nach bereinigten Quelltext tritt der Fehler immer noch auf...!!

Gruss
DelphiUser7