personelowi rodzajowych w Delphi

Question

Próbuję napisać właściwość, który używa rodzajowych:

type TMyClass = class 
    protected 
    function GetCountBy<T: Class>: Integer; 
    public 
    property CountBy<T: Class>: Integer read GetCountBy<T>; 
    end; 

ale nie kompilacji w deklaracji majątkowych z komunikatem „Property CountBy nie istnieje w klasie bazowej” i czerwone zawijas na otwarciu < nazwy właściwości.

Czy jest jakiś sposób, aby to osiągnąć?

Edit: Oto mój drugi przypadek użycia, który jest bardziej skomplikowane, ale bardziej realny świat:

property ItemsBy<T: Class>[Index: Integer]: T read GetItemsBy<T> write SetItemsBy<T>; 

Funkcja filtruje zawartość listy, aby zwrócić przedmiot Index'th z określonej klasy.

Answer 1

właściwości generyczne nie są obsługiwane w Delphi. Tylko ogólne klasy lub ogólne metody.

Nie mogę znaleźć niczego w dokumentacji, która wyraźnie określa to ograniczenie. Z drugiej strony w dokumentacji opisano jedynie ogólne klasy i ogólne metody. I new language grammar to support generics również nie wspomina o właściwościach.

Answer 2

nie jestem do prędkości na rodzajowych, ale nie powinna być deklaracja bardziej jak to

type TMyClass<T: class> = class 
    protected 
    function GetCountBy<T>: Integer; 
    public 
    property CountBy<T>: Integer read GetCountBy<T>; 
    end;