Problem mit Abspielen von Song, außerhalb der Playlist

[DelphiUser7]

Hallo!
Danke, es funktioniert, aber du hast die beiden Anweisungen, für das Öffnen einer Datei von der PlayList bzw. per 'Öffnen'-Button vertauscht.
Das hab ich natürlich gleich geändert;
Der (endgültig bereinigte) Quelltext lautet:

Delphi-Quellcode:

procedure TForm1.Play1Click(Sender: TObject);
begin
  If Mediaplayer1.Mode = mpOpen then Mediaplayer1.close;
  If PlayList1.ItemIndex = -1 then begin
      Mediaplayer1.FileName := FileLoad1.FileName; {Datei von FileLoad1}
    end else begin
      Mediaplayer1.FileName := PlayList1.Items.Strings[PlayList1.ItemIndex]; {Datei von PlayList}
    end;
    SongPanel.Caption := Mediaplayer1.FileName;
    Mediaplayer1.Open;
    Mediaplayer1.Play;
    Timer1.Enabled := True;
end;

Gruss
DelphiUser7