Hallo, ich bin fast am verzweifeln, weil es eigentlich eine einfache sache ist, aber es will einfach nicht klappen
An einem bestimmten Teil des programmes, werden die ini informationen ausgelesen und können geändert werden.
Aber ab da wo die Einträge in der Ini quasi geupdatet werden sollen, speichert er einfach nicht die neuen daten
Delphi-Quellcode:
if fileexists(ExtractFilePath(ParamStr(0))+ '
db.plt')
then
begin
ini2:=TIniFile.Create(ExtractFilePath(ParamStr(0))+ '
db.plt');
try
ini2.WriteInteger(playername, '
points', StrToInt(Edit1.Text));
//Neue Punkte schreiben
ini2.WriteString(playername, '
editdate', DateToStr(date));
// Editierdatum schreiben
ini2.WriteInteger(playername, '
puffer', newpuffer);
//Puffer schreiben
//ini.WriteInteger(playername, 'penalty', penalty); // Strafpunkt setzen (folgt später)
ini2.UpdateFile;
finally
ini2.free;
end;
end;
Keiner der Writevorgänge funktioniert.
Am einem anderen teil im programm wiederum funktioniert es reibunglos
Delphi-Quellcode:
if fileexists(ExtractFilePath(ParamStr(0))+ '
db.plt')
then
begin
ini:=TIniFile.Create(ExtractFilePath(ParamStr(0))+ '
db.plt');
try
ini.WriteInteger(playername, '
points', StrToInt(playerpoints));
ini.WriteString(playername, '
adddate', DateToStr(date));
ini.WriteInteger(playername, '
puffer', puffer_calc);
ini.WriteInteger(playername, '
penalty', 0);
ini.WriteString(playername, '
edit', '
');
finally
ini.free;
end;
end;
Ich finde einfach den Fehler nicht