Speichern in einer externen Textdatei

[danielkussin]

Es will immer noch nicht so richtig. Ich bekomm jetzt an folgender Zelle folgende Fehlermeldung:

Fehlermeldung: [Fehler] uTextdatei.pas(142): Anweisung erforderlich, aber Ausdruck vom Typ 'Integer' gefunden

Delphi-Quellcode:

procedure DateiSchreiben(dateiname : tFilename);
  var
    TextArray : tTextArray;
    x, y : integer;
    Zeile : string;
    StrList : tStringList;
begin
  ArrayInDatei(dateiname, TextArray);
  StrList := NIL;
  try
    SetLength(Zeile,cAnzSpalten);
    StrList := TStringlist.Create;
    for y := 1 to cAnzZeilen do
      begin
        for x := 1 to cAnzSpalten do
          Zeile[x] := chr(TextArray[x,y]);
        StrList.Add(Zeile);  // <-- Hier die Fehlermeldung, wo liegt denn mein Problem.
      end;
    StrList.SaveToFile(dateiname); 
  finally
    StrList.Free;
  end;
end;

Ich würde denken, dass ich doch dem StrList einfach eine Zeile hinzufüg, und ihn nicht anweise, erbitte wieder Hilfe.

Daniel