Immer noch besser als die ganze Klasse jedesmal neu zu schreiben. Und ohne die Unterstützung der echten Generics brauchst du ja auch den größten Teil nicht. Ohne reicht ja das:
Delphi-Quellcode:
TTypedObjectListItem = TPosScreenElement;
{$include 'TypedObjectListTemplate.inc'}
TPosScreenElementList = class(TTypedObjectListTemplate)
// und nach dem Implementation noch ein Include
Insbesondere aber die einfache Unterstützung von echten Generics und alten Delphis mit nur wenigen Zeilen fand ich aber sehr interessant, da ich auf Generics nicht verzichten wollte, aber auch möglichst wenig redundanten bzw. extra für alte Versionen geschriebenen Code wollte.