Probleme mit tStrings und Strings im Memofeld

[chrizke]

Ok, hier der ganze code:

Delphi-Quellcode:

procedure TfMain.btEinlesenClick(Sender: TObject);
var i, Code, aNr, aJahr:integer;
    Zeile,testt, aSachgebiet, aAutor, aTitel, aOrt, aVerlag : String;
    neu : tBuch;
    zeilenarray:array of String;
begin
  mAnzeige.Lines.LoadFromFile('Buecher.txt');
  Anzahl := mAnzeige.Lines.Count;
  Buchliste := tListe.create;
  for i := 0 to Anzahl-1 do begin
     Zeilenarray:=Split(mAnzeige.lines[i], ';');
  end;

Alles was noch danach in der procedure kommt, ist irrelevant und hat nichts mit dem Problem zu tun, das ich habe.