Forum: Programmieren allgemein
by Mavarik,
1. Jul 2019
Nein, natürlich nicht - wenn Du es so aufgefasst hast, entschuldige ich mich hierfür...
Forum: Programmieren allgemein
by Mavarik,
30. Jun 2019
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.
Forum: Programmieren allgemein
by Mavarik,
30. Jun 2019
Das ist ja auch nur dafür da, damit Du nicht für jede Zeile ein Setlength aufrufen musst.
Forum: Programmieren allgemein
by Mavarik,
30. Jun 2019
File öffnen..
var
CheckM3U: array of string;
i: Integer;
begin
AssignFile(F, Filename);
SetLength(CheckM3U, FFile.Count); // <- das ist eine Textdatei File Count ist nicht die Zeilen Anzahl
Reset(f); // Fehlte
Forum: Programmieren allgemein
by Mavarik,
30. Jun 2019
Ich hoff Du hast es so nicht geschrieben...
sondern
Var
S : TArray<String>;
Zeig mal den Code PLS
Forum: Programmieren allgemein
by Mavarik,
30. Jun 2019
LOL... Nach dem Lesen, musst Du die Datei natürlich wieder zu machen und mit rewrite neu schreiben...
Forum: Programmieren allgemein
by Mavarik,
30. Jun 2019
Pseudo Code:
I := 0;
if FileExists
While not eof do
Readln(F,Array)
inc(I)
Work...