我试图在Delphi 2009中的以下示例代码中实现清楚.
interface
...
TFoo<T : IInterface> = class(TObject)
FField : T;
procedure Clear;
end;
...
implementation
...
procedure TFoo<T>.Clear;
begin
// Line Below Results In
// E2010 Incompatible types: 'T' and 'Pointer'
FField := nil;
end;
...
如果“T”没有受到约束,我可以理解合规时间错误.
但是由于“T”必须是一个接口,所以我会以为这个语法会有
工作.
有没有将FField设置为NIL,因此可以释放接口？
解决方法
而不是nil,您必须使用新的Default(T),它返回通用参数类型的默认值.对于接口,它是零
procedure TFoo<T>.Clear; begin FField := Default(T); end;