Klassen-Eigenschaft als Array

[RWarnecke]

Hallo zusammen,

ich probiere mich gerade an Klassen. Ich habe mich schon durch ein paar Tutorials gewühlt. Eine Klasse zu erzeugen mit Eigenschaften und so weiter funktioniert auch wunderbar. Ich habe die Klasse wie folgt erstellt :

Delphi-Quellcode:

  TSample = class(TObject)
  private
    FWert1 : integer;
    FWert2 : integer;
  public
    constructor Create;
    property Wert1: integer read FWert1;
    property Wert2: integer read FWert2;
    procedure GetInfos;
  end;

constructor Create;
begin
  GetInfos;
end;

procedure GetInfos;
begin
  FWert1 := FWert1 + random(10);
  FWert2 := FWert2 + (Random(10) + FWert1);
end;

Wenn ich das ganze jetzt in mehrmals aufrufe, dann werden die Werte hintereinander geschrieben. Nun möchte ich die Ergebnisse von FWert1 und FWert2 in ein Array schreiben, so das die Eigenschaft Wert1 und Wert2 als array of integer ist. Wie mache ich aus der einfachen Integer-Wert-Eigenschaft ein Array Of Integer ?