Zitat von
Elvis:
Bleistift:
Delphi-Quellcode:
TContactList = class
private
fInnerList : TObjectList;
function GetItem(aIndex: Integer): TContact;
procedure SetItem(aIndex: Integer; aItem: TContact);
...
Und wo ist jetzt der Vorteil gegenüber einer direkten Beerbung von TObjectList? Oder seh ich was nicht?