Fehler bei REWRITE

[Chrissi91]

Schön, aber wie ihr sehen könnt, bin ich 14 Jahre alt

Die Delphi - Hilfe ist Englisch. Zwr bin ich in der 9.Klasse auf dem Gymnasium und habe jedes Halbjahr eine 1 oder 2 auf dem Zeugnis *angeb* , aber ich verstehe keine spezifischen Ausdrücke, die z.T. noch nicht einmal im Langenscheidt Lexikon stehen

Edit:

Geht das auch?

Delphi-Quellcode:

var 
datei, datei2: textfile; 
begin 
if fileexists('Eintrage.txt') then 
begin 
  assignfile(datei2,'Eintrage.txt'); //Das ist die Index-Datei 
  append(datei2); 
  writeln(datei2, edit1.text+'  '+edit2.text+'.txt') //Daraus setzt sich der Dateiname zusammen 
  closefile(datei2); 
end 
else 
begin 
  assignfile(datei,'Eintrage.txt'); //Das ist die Index-Datei 
  rewrite(datei); 
  writeln(datei, edit1.text+'  '+edit2.text+'.txt') //Daraus setzt sich der Dateiname zusammen 
  closefile(datei); 
end; 
end;