Hallo, ich habe eine Frage betreffs einer eigenen Klasse.
Und zwar ist sie z.b. so definiert:
Delphi-Quellcode:
type TTestData = record
T1 : integer;
T2 : integer;
end;
type TData = record
Wert1 : integer;
Wert2 : TTestData;
end;
type TMeineKlasse = class(TObject)
private
FData : array of TData;
procedure SetWert2 (Index : integer; AValue : integer);
function GetWert2(Index : integer) : Integer;
public
// hier soll die Property hin
constructor create;
destructor destroy;
Property Wert2[Index : integer] : TTestData read GetWert2 write SetWert2;
end;
Jetzt ist meine Frage wie ich es hinbekomme, dass wenn ich das Object mein Objekt erstellt habe einen solchen Zugriff hinbekomme:
Delphi-Quellcode:
MeinObject := TMeineKlasse.create;
MeinObject.Wert2[0].T2 := 4;
Geht sowas, oder muss ich für jeden parameter von Wert2 eine eigene Property definieren!?
Danke