pascalabcnet/TestSuite/inheritanceFromListInt.pas
2018-05-07 14:21:01 +03:00

12 lines
158 B
ObjectPascal

type
MyList<T> = class(List<T>)
public
end;
begin
var l := new MyList<integer>;
l.Add(3);
l.Add(3);
l.Add(7);
Assert(l.IndexOf(7)=2);
end.