Generics

Introduction

Generics are native implementation of class templates.

Generic class is defined using keyword generic before class name and use in class declaration: <delphi>type

 generic TList<T> = class
   Items: array of T;
   procedure Add(Value: T);
 end;</delphi>

Example of generic class implementation: <delphi>implementation

procedure TList.Add(Value: T); begin

 SetLength(Items, Length(Items) + 1);
 Items[Length(Items) - 1] := Value;

end;</delphi>