OK, habe ich erst übersehen:
Delphi-Quellcode:
type
TDoorList = TObjectList<TTBADoor>;
TDoorListInterceptor = TObjectListInterceptor<TTBADoor>;
Das muss heißen:
Delphi-Quellcode:
type
TDoorList = class(TObjectList<TTBADoor>);
TDoorListInterceptor = class(TObjectListInterceptor<TTBADoor>);
Im
GitHub Repo steht das auch im ReadMe:
Zitat:
The new attribute (JsonObjectListContactAttribute) as well as the new list (TContactList) must not be an alias - the class keyword is mandatory.