Frage zur Funktion Explode

[fkerber]

Hi!

Delphi-Quellcode:

Procedure TForm1.einlesen();
Var
zeile:String;
zwischenarray: TStringDynArray;
Begin
assignfile(db,dbfile);
reset(db);
While not eof(db) do
Begin
readln(db,Zeile);
zwischenarray:=explode(',',Zeile);
DVD.Titel[zaehler]:=zwischenarray[1];
zaehler:=zaehler+1;
//ausgabe(1);
end;

Es kommen aber noch andere Fehler und dein Code sieht für mich grausam aus, nicht persönlich nehmen, aber so viele ///////////// und keine Einrückungen etc.
Er kann irgendwie die "Datenbank" bei mir nicht laden.

Ciao fkerber