pcplayer · 2004-12-30 07:10:48 · 阅读: 344 看来是不需要。只要释放接口，对象就自动被释放了。 function TInterfacedObject._Release: Integer; begin Result := InterlockedDecrement(FRefCount); if Result = 0 then Destroy; end;
| -ICP -IDC -ISP |