Eine gute, aber nicht ganz "einfache" Lösung:
Delphi-Quellcode:
Type TErgebnis = Record
Nummer: Integer;
Ergebis1, Ergebnis2: Single; // meine Ergebisse
// hier kann nahezu alles stehen
end;
Type pTErgebnis = ^TErgebnis; // Pointer auf den Record
...
Ergebnisliste: TList;
...
// INITIALISIERUNG
Ergebnisliste := TList.create;
// MIT DATEN FÜLLEN
var Neu: pTErgebnis;
begin
new(Neu); //Neuen Poiter erstellen
Neu.Nummer := 1;
Neu.Ergebnis1 := 12.345;
Neu.Ergebnis2 := 34.09;
Ergebnisliste.add(Neu);
// DATEN ANZEIGEN (zB Stringgrid);
var i: integer;
daten: pTErgebnis;
begin
Stringgrid1.rowcount := Ergebnisliste.count+2; //reihen setzen
Stringgrid1.colcount := 3; //spalten setzen
for i := 0 to Ergebisliste.count-1 do
begin
daten := Ergebnisliste.Items[i]; //Daten holen
Stringgrid1.cells[i+1,0] := inttostr(daten.Nummer);
Stringgrid1.cells[i+1,1] := floattostr(daten.Ergebnis1);
Stringgrid1.cells[i+1,2] := floattostr(daten.Ergebnis2);
end;