also, ich hoffe ich hab dich richtig verstanden
falls ja ist hier eiun lösungsvorschlag:
Delphi-Quellcode:
//aus datei lesen
var punkte:real;// (verwendet man double, egal...)
begin
memo1.Lines.LoadfromFile('WasWeiss.ich');
punkte:=strtofloat(Memo1.Lines.Text[5]+Memo1.Lines.Text[6]+Memo1.Lines.Text[7]);
//also, text in memo, stellen wo zahl steht in string, und dann StringToFloat
end;
//in datei schreiben
var punkte:real;
begin
Memo1.Lines.Text[5]:=inttostr(punkte mod 10);
Memo1.Lines.Text[6]:='.';
Memo1.Lines.Text[7]:=inttostr((punkte * 10) mod 10);
//also, stelle für stelle von zahl in memo, dann speichern
memo1.Lines.SavetoFile('WasWeiss.ich');
end;