Also es soll eine Playlist sein die etwas aus der Datei öffnet.
Delphi-Quellcode:
if ausgelesen[aktuell] = 'Spiel' then aktuell := 4;
Form1.Mediaplayer1.Close;
Form1.Mediaplayer1.Filename := ausgelesen[aktuell];
Form1.Mediaplayer1.Open;
Form1.Mediaplayer1.Play;
Form1.Liedtitel.AlphaChannel := 1;
Form1.Liedtitel.Visible := true;
Form1.Liedtitel.Caption := '♪ Play song: ' + ExtractFileName(ausgelesen[aktuell]);
aktuell := aktuell+1;
warten := 2000;
ausgelesen.Free;
end;
Die Datei exsitiert wirklick
C:\Users\Nicht Wichtig\Documents\01 Better Way.mp3
Nicht Wichtig ist der Benutzername den ich nicht zeigen will.
Der Fehler ist in einer MessageBox und lautet:
"Kein MCI-Gerät geöffnet"
"Fehler beim Starten vom MCI