delphi - 我的OO泛型设计错误。我该如何解决？

Question

我在第三类上收到“ E2511类型参数'T'必须是类类型”。

type TSomeClass=class
end;

ParentParentClass<T>=class 
end;

ParentClass<T: class> = class(ParentParentClass<T>)
end;

ChildClass<T: TSomeClass> = class(ParentClass<T>)
end;

我正在尝试为任何数据类型（ParentParentClass）编写一个精简的通用数组包装器，但是因为我无法释放类型识别符（如果T是TObject，然后是Tobject（T）.Free），则创建了第二个类，对于类类型很有用，因此我可以释放对象。

第三类是我使用包装器的地方，但是编译器会抛出该错误。如何进行编译？

Answer 1

这是a bug in Delphi 2009's generics handling。它在D2010中修复。