Also:
Ich habe nu beim media player
Delphi-Quellcode:
procedure TForm1.PlayFile(songNumber: integer);
begin
if fileexists(Playlist.Strings[songNumber]) then begin
CurrentSong := songNumber;
mediaplayer1.Close;
mediaplayer1.FileName := Playlist.Strings[songNumber];
mediaplayer1.open;
mediaplayer1.play //Hier das gelöscht
end;
end;
und nun kann ich das lied mit dem play button abspielen.
Des andere ÖProblem dabei is nu, dass wenn ich mehrere lieder hab, dass er die nicht mehr nacheinander abspielt sonder ich bei jedem einzelnen lied auf play klicken muss.