加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 大数据 > 正文

oop – 在运行时实现接口有什么好处?

发布时间:2020-12-15 04:34:04 所属栏目:大数据 来源:网络整理
导读:我正在努力了解 TVirtualInterface课程. {$APPTYPE CONSOLE}uses SysUtils,Rtti;type ISpecificInterface = interface(IInvokable) ['{281D8B97-397E-430A-895A-9CA4E1F5FB5F}'] procedure SpecificProcedure; end;procedure AProcedure(Method: TRttiMethod
我正在努力了解 TVirtualInterface课程.
{$APPTYPE CONSOLE}

uses
  SysUtils,Rtti;

type
  ISpecificInterface = interface(IInvokable)
    ['{281D8B97-397E-430A-895A-9CA4E1F5FB5F}']
    procedure SpecificProcedure;
  end;

procedure AProcedure(Method: TRttiMethod; const Args: TArray<TValue>;
  out Result: TValue);
begin
  Writeln(Method.ToString);
end;

var
  ISpecificInterfaceInstance: ISpecificInterface;

begin
  ISpecificInterfaceInstance := TVirtualInterface.Create
    (TypeInfo(ISpecificInterface),AProcedure) as ISpecificInterface;

  ISpecificInterfaceInstance.SpecificProcedure;

end. // TVirtualInterface ref. counter is decremented

在运行时实现接口有什么好处?

空间的用途是什么?

解决方法

描述是 here

Provides functionality for remote procedure call marshaling…

(编辑:李大同)

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

    推荐文章
      热点阅读