1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

  TMyList = class(System.Collections.ArrayList)
  public
  end;
  TMyItem = class
  public
  end;

//jetzt soll sowas möglich sein
var
  AMyList : TMyList;
  AMyItem : TMyItem;
begin
  AMyItem := AMyList.Item[0];  //normaler weise bräuche man hier ja einen Typcast
end;					

1:
2:
3:
4:

List<MyItem> list = new List<MyItem>();
list.Add(new MyItem());
      
MyItem myItem = list[0];					

1:
2:
3:
4:

var list = new List<MyItem>();
list.Add(new MyItem());
      
var myItem = list[0];					

1:
2:
3:
4:

public int Add(MyItem value)
{
  return InnerList.Add(value);
}					

1:
2:
3:
4:

int IList.Add(object value)
{
  return Add(value as MyItem);
}					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:

MyItemCollection = public class(IList)
private
  fInnerList: ArrayList; readonly;
  
  method set_Item(index : Integer; value: MyItem);
  method get_Item(index : Integer): MyItem;
protected
  property InnerList : IList read fInnerList; implements IList;
public
  constructor;
  constructor(capacity : Integer);
  
  property Count : Integer read fInnerList.Count;
  
  property IsFixedSize    : Boolean read fInnerList.IsFixedSize;
  property IsReadonly     : Boolean read fInnerList.IsReadonly;
  property IsSynchronized : Boolean read fInnerList.IsSynchronized;
  
  property Item[index : Integer] : MyItem
    read get_Item write set_Item; default; virtual;

  method Add(value : MyItem) : Integer; virtual;
  method Remove(value : MyItem); virtual;
  method Contains(value : MyItem) : Boolean; virtual;
  method IndexOf(value : MyItem) : Integer; virtual;
  method Insert(index : Integer; value : MyItem); virtual;
end;					

1:
2:
3:

[XMLInclude(TypeOf(MyItem))]
TMyList = class(ArrayList)
....					

1:
2:
3:

type 
  MyItemCollection = public class(List<MyItem>)
  end;