Mache ich ja siehe letzter Beitrag..
Delphi-Quellcode:
SList := TStringList.create;
SList.LoadFromFile(Filename); // öffnen
if SList.Strings[0] = '#EXTM3U' then // Bereich auslesen
CheckM3U := true;
SList.Free; // schließen
AssignFile(F, Filename); // öffnen
ohne Array !!
Echt jetzt? Den ganzen File in Memory laden um festzustellen, ob in der 1. Zeile ein Token steht...
Und wenn es eh schon im Speicher ist, dann nicht die List ergänzen und SavetoFile…
omg... Ich gebe auf.