Stringlängenbegrenzung bei 'Writeln'

[roadrunner-S51]

Hallo an Alle,

ich habe mal wieder ein eigenartiges Problem in meinem Code entdeckt. Ich habe einen String, der z.B. 428 Zeichen lang ist. Diesen Versuche ich mit Writeln in eine Datei zu schreiben. Ist dies erfolgt, fehlen hinten ein paar Zeichen, der String ist nach dem Schreiben also nur noch 384 Zeichen lang.

Gibt es bei dem Befehl Writeln eine Stringlängen-Begrenzung oder mach ich da was falsch?

Hier der Code:

Delphi-Quellcode:

    if i = 1 then   // wenn erste Zeile geschrieben wird Datei neu schrieben
    begin
      AssignFile(f, 'R_Lager.txt');
      Rewrite(f);
      Writeln(f, RecordString);
    end
    else
    begin            // alle weiteren Zeilen anhängen
      Append(f);
      Writeln(f, RecordString);
    end;

Ich danke schonmal für eure Hilfe!