Problem mit Abspielen von Song, außerhalb der Playlist

[Christian Seehase]

Moin DelphiUser,

wenn das nicht der Fall sein soll, solltest Du mal etwas verschwenderischer mit begin/end umgehen

So steht es bei Dir:

Delphi-Quellcode:

// if Open then Close. Mehr nicht.
If Mediaplayer1.Mode = mpOpen then 
   Mediaplayer1.close; 
   // In jedem Falle wird versucht diesen Eintrag zu lesen, und das führt zu dem Fehler
   Mediaplayer1.FileName := PlayList1.Items.Strings[PlayList1.ItemIndex]; 
   SongPanel.Caption := Mediaplayer1.FileName; 
   SongPanel.Width := 
   Mediaplayer1.Open; 
   Mediaplayer1.Play; 
   Timer1.Enabled := True; 
begin 
  Mediaplayer1.Open; 
  Mediaplayer1.Play; 
  Mediaplayer1.FileName := FileLoad1.FileName; 
  Timer1.Enabled := True; 
end; 
end;