オブジェクトかインタフェースですか？私はそれを解放する必要がありますか？

Question

おやすみ！関数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

Answer 1

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; 

これは、オブジェクトの有効期間がインタフェース参照カウントによって管理されることを意味します。つまり、あなたのコードは正しいし、漏れません。

コンストラクタにOwnerを渡した場合、その所有者が生涯を管理することに注意してください。

URLの設定が上がると、あなたのコードがまだ漏れやすくなります。

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

ことのすべてを言って、THTTPRIOクラスはIInvokableをサポートしていないので、おそらく、あなたの実際のコードは若干異なって見える：私はこのようにそれを記述します。