Eine Art Reflection

[christo]

Hallo Zusammen,
vielen Dank fuer die Unterstuetzung. Allerdings komme ich mit den Hinweisen noch nicht weiter. Vielleicht nochmal mein Konstrukt...

Delphi-Quellcode:

TMyObjectBase = class(TObject)
public
  property Name: string;
end;

TMyObjectOne = class(TMyObjectBase)
public
  property Color: string;
end;

TMyObjectTwo = class(TMyObjectBase)
public
  property Position: string;
end;

TMyList
public
  property Items[Index: integer] : TMyObjectBase; read GetItems write SetItems;
end;

...
for i := 0 to MyList.Count -1 do
//cast
  TMyObcetTwo(MyList.Items[i])Positon

//besser???
  MyList('ObjectTwo').Position

Ich denke der Haken ist der Count der Liste. Muesste vielleicht eher ueber for each in funktionieren, aber das kennt Delphi ja so nicht?

Gruss,
Chris