schreibt weniger zeilen in file als angeführt

[Molzer]

Ich hänge an ein bestehendes File Zeilen an, mein Problem dabei ist,
dass er bei for i:=to 25 nicht 25 Zeilen reinschreibt, wenn ich to 30 nehme schreibt er
genau so viele Zeilen wie bei 25 und bei 40 schreibt er wieder ein paat mehr..

Delphi-Quellcode:

procedure TForm1.HBtClick(Sender: TObject);
begin
if opendialog1.execute then
begin
  assignfile(f, opendialog1.filename);
  append(F);
    writeln(F,leer);
     Writeln(F,CDAnzeige.Cells[0,1]+'|',CDAnzeige.Cells[1,1]);
     Writeln(F,CDAnzeige.Cells[2,1]+'|',CDAnzeige.Cells[3,1]+'|',CDAnzeige.Cells[4,1]);
      Writeln(f,Entlehner.Cells[1,1]+'|',Entlehner.Cells[2,1]+'|',Entlehner.Cells[3,1]+'|',
                Entlehner.Cells[4,1]+'|',Entlehner.Cells[5,1]+'|',Entlehner.Cells[6,1]);
       for i:=1 to 25 do
       Writeln(F,TrackAnzeige.Cells[0,i]+'|',TrackAnzeige.Cells[1,i]+'|',TrackAnzeige.Cells[2,i]+'|',TrackAnzeige.Cells[3,i]);
       end;

[mkinzler]

Wieviel schreibt er den bei 25?
BTW. Rück mal so ein, dass man die Blöcke erkennen kann

[fkerber]

Was steht denn in Trackanzeige drin?

Ciao, Frederic

[Molzer]

Also ich hab jetzt was eingegeben in die felder
und das steht im file:

Hansi|Hinterseer
cd|2009|Schnulze
|||||
1|Ih bins da Hansi||
2|||
3|||
4|||
5|||
6|||
7|||
8|||
9|||
10|||
11|||


es passt alles nur er sollte aber genau bis 20||| schreiben

[alzaimar]

Wo wird die Datei geschloseen?

[Molzer]

ganz genau!!
sorry für meine und danke!!