Werte von Integer in Textdatei speichern

[himitsu]

@DeddyH: die TStringList bietet dafür aber auch Möglichkeiten ... muß man also nicht selber suchen

Delphi-Quellcode:

// Datei und Benutzer sind Strings und Counter, PunkteDazu sind Integer
// (Typkonvertierung passiert intern)

// alle nötigen Befehle:
XML := TXMLFile.Create;
XML.LoadFromFile(Datei);
Counter := XML.RootNode.Node[Benutzer].Data;
....
XML.RootNode.Node[Benutzer].Data := Counter;
XML.SaveToFile(Datei);
XML.Free;
// hier muß man nur aufpassen, daß Benutzer keine Lehrzeichen und sowas enthält

das geht eigentlich mit fast allen XMLLibs ähnlich einfach

und in Kurz ginge bei himXML auch sowas:
Benutzer darf hier nur keine * ? \ und > enthalten

Delphi-Quellcode:

XML := TXMLFile.Create(nil, false, 'meinepunkteliste');
XML.Options := [xoNodeAutoCreate, xoAutoSaveOnClose];
if FileExists(Datei) then XML.LoadFromFile(Datei)
else XML.Filename := Datei;
...
Counter := XML.RootNode.Node['user>name=' + Benutzer].Data;
XML.RootNode.Node['user>name=' + Benutzer].Data := 
  XML.RootNode.Node['user>name=' + Benutzer].Data + PunkteDazu;
XML.RootNode.Node['user>name=' + Benutzer].Data := Counter;
...
XML.Free;

Ergebnis wäre dann eine XML-Strucktur wie diese

XML-Code:

<meinepunkteliste>
  <user name="Benutzer">Counter</user>
  <user name="Benutzer2">Counter2</user>
  ...
</meinepunkteliste>