Zitat:
procedure Rewrite(var F: File [; Recsize: Word ] );
Description
Rewrite creates a new external file with the name assigned to F.
F is a variable of any file type associated with an external file using AssignFile. RecSize is an optional expression, which can be specified only if F is an untyped file. If F is an untyped file, RecSize specifies the record size to be used in data transfers. If RecSize is omitted, a default record size of 128 bytes is assumed.
If an external file with the same name already exists, it is deleted and a new empty file is created in its place.
Was du brauchst ist Append stat rewrite...
Zitat:
Prepares an existing file for adding text to the end.
procedure Append(var F: Text);