delphi – 它是一个对象还是一个接口？我是否需要释放它？

发布时间：2020-12-15 09:29:42 所属栏目：大数据来源：网络整理

导读：美好的一天！函数GetService创建类THTTPRIO的实例并将其作为IInvokable返回.我在另一个函数中使用这个接口/对象.当我不再需要它时,我是否必须释放它？接口不需要被释放,但我对RIO被创建为THTTPRIO类的对象这一事实感到困惑. function GetService(Addr: strin

美好的一天！函数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

解决方法

要回答这个问题,您需要检查如何为此类实现IInterface._AddRef和IInterface._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;

这意味着对象的生命周期由接口引用计数管理.这意味着您的代码是正确的并且不会泄漏.

请注意,如果您已在构造函数中传递了所有者,则生命周期将由该所有者管理.

如果URL的设置提高,您的代码仍有可能泄漏.我会这样写：

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

说完这一切之后,THTTPRIO类不支持IInvokable,所以也许你的实际代码看起来略有不同.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!