首先看下面的示例代码： 一般来说，我们认为 Delphi 自己管理接口的引用计数，所以不太会注意，但是，在上面的示例中，由于要保证 ATest 在匿名函数中的可用性，Delphi 并没有在函数退出时，减少 ATest 的引用计数，而在匿名函数执行完成后，同样也并没有减少计数，这就造成了 ATest 实例的引用计数没有减