zoukankan      html  css  js  c++  java
  • Delphi判断某个类是否实现了某个接口

    通过TObject.GetInterface可以获得对象的实例实现某个接口,前提条件是必须实例化对象后才能运行GetInterface

    下面的方法可获取类是否实现了某个接口,并返回接口的偏移:

    function FindInterface(AClass: TClass; GUID:TGUID; var Offset:NativeInt):Boolean;
    var
      i : integer;
      InterfaceTable: PInterfaceTable;
      InterfaceEntry: PInterfaceEntry;
    begin
      while Assigned(AClass) do
      begin
        InterfaceTable := AClass.GetInterfaceTable;
        if Assigned(InterfaceTable) then
        begin
          for i := 0 to InterfaceTable.EntryCount-1 do
          begin
            InterfaceEntry := @InterfaceTable.Entries[i];
            if InterfaceEntry.IID=GUID then
            begin
              Offset:=InterfaceEntry.IOffset;
              Exit(True);
            end;
          end;
        end;
        AClass := AClass.ClassParent;
      end;
    end;
    

     下面我们看下通过偏移量的快速获得对象的接口,以及通过接口快速获取对象:

    快速获取对象的接口:

    type
      TSomeObject=class(TXXX, ISomeInterface)
      ......
      end;
    
    var
      FItemObjectOffset:NativeInt;
    
    //获取偏移量
    FindInterface(TSomeObject, ISomeInterface, FItemObjectOffset)
    
    var
      P:TSomeObject;
      Intf:ISomeInterface;
    ....................................
    
    //通过对象直接获取接口
        PNativeInt(@Intf)^:=PNativeInt(@P)^+ FItemObjectOffset;
        Intf._AddRef;
    

      

    快速通过接口获取对象

    type
      TSomeObject=class(TXXX, ISomeInterface)
      ......
      end;
    
    var
      FItemObjectOffset:NativeInt;
    
    //获取偏移量
    FindInterface(TSomeObject, ISomeInterface, FItemObjectOffset)
    
    var
      P:TSomeObject;
      Intf:ISomeInterface;
    ....................................
    
    //通过接口获取对象
      P:=TSomeObject(Pointer(PNativeInt(@Intf)^- FItemObjectOffset));
    

      

  • 相关阅读:
    Django 请求生命周期
    Django views.py中的 FBV(函数) CBV(类)
    cookie session
    Django admin
    Django ORM QuerySet集合对象的特性
    Django ORM 多对多操作 使用聚合函数和分组 F查询与Q查询
    Django ORM 一对多操作
    Django ORM 单表操作
    Django 模板 template
    css之background-clip: text
  • 原文地址:https://www.cnblogs.com/hezihang/p/5735897.html
Copyright © 2011-2022 走看看