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 
  
  
  
        
 (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!  | 
                  
