Ste*_*eve 1 delphi generics interface delphi-2009
它当然看起来像一个bug,但我只有试用版本,所以它可能已被修复.
ITestInterface = interface
  ['{9445CED8-4DBA-4EDB-9897-60980B438BE4}']
  procedure Foo1;
  procedure Foo2;
end;
TTest = class(TInterfacedObject, ITestInterface)
end;
以上将无法编译.但以下呢!
ITestInterface<t> = interface
  ['{9445CED8-4DBA-4EDB-9897-60980B438BE4}']
  procedure Foo1;
  procedure Foo2;
end;
TTest<T> = class(TInterfacedObject, ITestInterface<T>)
end;
编辑:我刚刚发现它如果你尝试实例化TTest就会失败.所以有点不一致,但不是那么糟糕!