Naja komischer Titel, aber mir ist nix besseres eingefallen
Zum Thema:
Ich hab folgenden Code:
Delphi-Quellcode:
procedure TMain.Button1Click(Sender: TObject);
var
Users: TStringlist;
begin
Users := TStringlist.Create; //Stringlist machen
try
Users.Add(User.txt); //Hinzufügen
except
Showmessage('Sorry aber du kannst dich nicht einloggen'); //Wenns net geht dann Meldung bringen
end;
Users.SaveToFile('Users.txt'); //Speichern
end;
procedure TMain.User_aTimer(Sender: TObject);
begin
Listbox1.Items.LoadFromFile('Users.txt'); //Aktuallisieren
end;
Das Problem ist das immer der erste eintrag der Textdatei überschrieben wird. D.h. Wenn ich mich als Spider einlogge, nochmal das Programm starte und mich als Mani einlogge dann steht in der Listbox net "Spider, Mani" sondern nur "Mani". Wie kann ich das verhindern?