Das demotiviert mich immer wenns dann nicht klappt

thx an Gausi und jeannicke^^
EDIT//Hab doch noch ein Problem...
Ich wollte das dafür haben, eine User-Datei, in der alle Users aufgelistet sind (einer pro Zeile)
(z.B)
//#ANFANG#
1.User
2.User
3.User
//#ENDE#
wenn ich es jetzt normal mit Append mache?
Delphi-Quelltext
1: 2: 3: 4:
| AssignFile(f, 'Users\AllUsers.dat'); Append(f); WriteLn(f, GetUsername); CloseFile(f); |
Dann hängt er es an den Text an:
//#ANFANG#
1.User
2.User3.User
//#ENDE#
Dann hab ich es so versucht:
Delphi-Quelltext
1: 2: 3: 4:
| AssignFile(f, 'Users\AllUsers.dat'); Append(f); WriteLn(f,#13#10 + GetUsername); CloseFile(f); |
Perfekt jetzt sieht es so aus:
//#ANFANG#
1.User
2.User
3.User
//#ENDE#
Aber wenn die Users.dat jetzt leer ist, was durchaus mal vorkommt

dann siehts so aus:
//#ANFANG#
1.User
//#ENDE#
Und diese freie Zeile stört leider sehr beim auslesen... wie kann ich das ändern?