Moin, ich habe ein kleines Spiel programmiert. Es arbeitet hauptsächlich mit Variblen, die je nach Aktion gesetzt werden.
Jetzt wird
Variable1 während des Spiels auf 100 gesetzt,
Variable2 auf 10. Wenn man dann keine Lust mehr hat, kann man auf speichern klicken und die
Variablen werden in einer Stringlist gespeichert:
Delphi-Quellcode:
procedure TForm1.SaveClick(Sender: TObject);
var Save: TStringList;
begin
Save:=TStringList.Create;
try
Save.Add(FloatToStr(Variable1));
Save.Add(FloatToStr(Variable2));
Save.SaveToFile(...\Save.txt');
finally
Save.free;
end;
end;
Bis dahin klappt das auch sehr gut...
Beim nächsten Programmstart wird dann gesucht, ob die Datei ...\Save.txt vorhanden ist. Wenn ja, dann wird die Prozedur
VariablenLaden aufgerufen.
Delphi-Quellcode:
if FileExists('...\Save.txt')
then VariablenLaden else VariablenNeu;
VariablenNeu wird also nur beim ersten Start aufgerufen und die
Variablen werden am Anfang auf Standardwerte gesetzt.
VariablenLaden soll die in der Stringlist gespeicherten
Variablen 1 und 2 laden. Da weiß ich jetzt nicht weiter.
In meiner .Txt steht jetzt:
100
10
__________
Doch ich weiß nicht, wie ich jetzt die
Variable1 auf die erste Zeile setzten kann, die
Variable2 auf die zweite Zeile.
Die
Variablen sind : real, ich möchte jedoch auch einen ganzen Text einer String-Variablen in der gleichen Datei speichern.
Was muss ich tun???
Liebe Grüße!
Zitat
Baum-Darstellung
