Hallo Forum!
Ich bin gerade dabei, ein Programm namens "chuck a luck" zu schreiben, was kurz gesagt ein Casino-Spiel ist. Das Programm selbst funktioniert soweit einwandfrei, nur hatte ich mir als eine kleine Sonderfunktion das Speichern des aktuellen Kontostands ausgedacht. Das funktioniert leider nicht so gut; er kann zwar den Eintrag aus der .ini Datei lesen, allerdings selbst nichts schreiben.
Hier erst einmal der Code, welcher das Speichern/Laden beeinhaltet:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
| procedure TForm1.MenuItem3Click(Sender: TObject);
var ini: TIniFile;
begin
ini:=TIniFile.create('c:\speicherstand.ini');
try
ini.WriteString('kontostand','pkontostand','23');
finally
ini.free;
end;
end;
procedure TForm1.MenuItem4Click(Sender: TObject);
var ini: TIniFile;
begin
ini:=TIniFile.Create('c:\speicherstand.ini');
try
pkontostand.caption:=ini.Readstring('kontostand','pkontostand','failed');
finally
ini.free;
end;
end; |
Die Zahl 23 beim schreiben ist zur Zeit nur zum Testen.
Der Inhalt, der von mir geschriebenen .ini Datei, sieht so aus:
[kontostand]
pkontostand=4830
Wenn ich nun auf laden im Programm klicke, ändert sich der Kontostand auf 4830, wenn ich auf speichern klicke, passiert rein garnichts.
1. Frage: Warum schreibt das Programm nichts in die .ini Datei?
2. Frage: Wie kann ich den sich variierenden Kontostand abspeichern? Einfach statt der momentanen Zahl 23 z.B. pKontostand.caption?
Danke im Voraus!
Moderiert von 
Narses: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am So 27.09.2009 um 22:33
