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 ?