回过头，观察一下代码我们会发现，others方法多余的，但还是在Delphi和Java里都写了空代码。此举多余乎？不多也。其实，接口有些私心，它让继承它的类必须一并实现它的方法，不然这个类就只能是适配器类或抽象类。哎，记住这一点吧。所以我在Delphi里没敢创建TsuperMan这个类，而是用通用的类TinterfacedObject。不然，我就得去实现这些：QueryInterface 、_AddRef、 _Release因为这是接口的老祖宗定义的。什么，连接口祖宗八代定义的方法都要在这个刚刚诞生的新类中去实现？是的。幸亏有TinterfacedObject这样的类。我们来看看它。

  TInterfacedObject = class(TObject, IInterface)

  protected

    FRefCount: Integer;

    function QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;

    function _AddRef: Integer; stdcall;

    function _Release: Integer; stdcall;

  public

    procedure AfterConstruction; override;

    procedure BeforeDestruction; override;

    class function NewInstance: TObject; override;

    property RefCount: Integer read FRefCount;

  end;

还有就是接口定义的所有方法都是公开的，接口中的常量都是public static和final，而且这些是不必说明的。

最后我们再来研究一下如何取得接口并调用它的服务。

var LiWei:IMyidol;

begin

 LiWei:=TAnders.Create;  //Tanders的对象制定给了接口LiWei。

 LiWei.name(''''LiWei!'''');   //调用name方法。

这是种隐式的操作方式，再来看看更明确的写法：

var Anders:TAnders; LiWei:IMyidol;

begin

 Anders:=TAnders.Create;  //生成对象。
 LiWei:= Imyidol(Anders);

 LiWei.name(''''LiWei!'''');

要说明的是，Anders必须支持Imyidol，不然报错。

还可以这样写：

var Anders:TAnders; LiWei:IMyidol;

const ILiWei:TGUID=''''{30DDAB80-81BF-11D8-A27B-930F92738A22}'''';

begin

 Anders:=TAnders.Create;  //生成对象。

 if Anders.GetInterface(ILiWei,LiWei) then

 LiWei.name(''''LiWei!'''');

end;

在Java中的情形是一样的：

 Man man=new Man();

 man.name("Anders Hejlsberg!");   //这是类对象实现的方式。

 Myidol lw=new Man();

 lw.name("LiWei!");             //这是接口实现方式。

聊到这里，相信我们都对接口有了一定认识。不过接口的话题太大了，牵扯的东西也非常多，所以不可能聊得太深太远。是不是聊得有点口渴了？快去喝点绿茶吧，比咖啡解渴。

上一页  [1] [2]