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