这是一个对象还是接口?我需要释放它吗?

5

你好!GetService函数创建THTTPRIO类的实例并将其作为IInvokable类型返回。我会在另一个函数中使用这个接口/对象。当我不再需要它时,我是否需要释放它?接口不需要释放,但是我对RIO被创建为THTTPRIO类的对象感到困惑。

function GetService(Addr: string): IInvokable;
var
  RIO: THTTPRIO;
begin
  RIO := THTTPRIO.Create(nil)
  RIO.URL := Addr;
  Result := (RIO as IInvokable);
end;

位置:

IInvokable = interface(IInterface);
THTTPRIO = class(TComponent, IInterface, IRIOAccess);

感谢您的提前帮助!Vojtech
1个回答

6
为了回答这个问题,您需要检查该类如何实现IInterface._AddRefIInterface._Release。它们看起来像这样:
function TRIO._AddRef: Integer;
begin
  Result := TInterlocked.Increment(FRefCount);
end;

function TRIO._Release: Integer;
begin
  Result := TInterlocked.Decrement(FRefCount);
  if (Result = 0) and not (Owner is TComponent) then
    Destroy;
end;

这意味着对象的生命周期由接口引用计数来管理。这意味着您的代码是正确的,不会泄漏。
请注意,如果您在构造函数中传递了一个 "Owner",那么生命周期将由该所有者来管理。
如果设置 "URL" 时出现异常,您的代码仍然存在泄漏风险。我会这样编写它:
function GetService(const Addr: string): IInvokable;
begin
  Result := THTTPRIO.Create(nil);
  (Result as IRIOAccess).RIO.URL := Addr;
end;

说了这么多,THTTPRIO类不支持IInvokable,因此您的实际代码可能略有不同。

+1 我通常会小心地将接口使用与对象使用分开。感谢您的信息。所以,如果我们在 Result := (RIO as IInvokable); 之后添加两行新代码 Result := nil; Showmessage(Rio.URL),那么会导致 AV 错误,对吗? - Justmade
@Justmade 是的,我认为会。 - David Heffernan
不一定。对象仍然可能能够更多或更少地运行。只有当对URL的调用引用NIL指针(或其他指针值也会导致AV)时,才会收到AV。 - dummzeuch
@dummzeuch URL 属性会解引用 self 指针。如果内存管理器已经重用了该内存,则会出现错误。 - David Heffernan

网页内容由stack overflow 提供, 点击上面的
可以查看英文原文,
原文链接