Einzelnen Beitrag anzeigen

FredlFesl

Registriert seit: 19. Apr 2011
293 Beiträge
 
Delphi 2009 Enterprise
 
#6

AW: Überschreiben

  Alt 30. Mai 2011, 07:46
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.
  Mit Zitat antworten Zitat