So macht man das seit Delphi 2 eigentlich.
Delphi-Quellcode:
Procedure TMyForm.LoadHighScore(aHighScoreFilename :
String);
Var
csv, csvRow : TStringList;
i : Integer;
Begin
csv := TStringlist.Create;
csvRow := TStringList.Create;
Try
csvRow.DelimiterChar := '
;';
csv.LoadFromFile(aHighScoreFilename);
For i := 0
To csv.Count - 1
do begin
csvRow.DelimitedText :=
csv[i];
MyHighScoreStringGrid.Rows[i] := csvRow;
End;
Finally
csvRow.Free;
csv.Free;
End;
End;
Klar, man kann auch komplett auf die Vorteile von Delphi verzichten und so tun, als ob es keine netten vorgefertigten Klassen gibt.
Das Bild hängt schief.