内容简介:翻译自:https://stackoverflow.com/questions/14342263/how-do-i-check-whether-an-interfaced-object-implements-another-interface
我有这些接口声明:
IListener = interface
procedure HandleEvent(AEvent: TMyEvent);
end;
IExtendedListener = interface(IListener)
['{85A3456A-D5E5-4F37-ABDD-A75A7B3B494C}'] // required by GetInterface
procedure HandleExtendedEvent(AExtendedEvent: TMyExtendedEvent);
end;
给定实现IListener的东西的接口引用,我如何检查它是否也实现了IExtendedListener?我正在使用代码下面的代码,因为这是一个编译时错误,如果Listener是IExtendedListener然后….
TSomeClass.Notify(AEvent: TMyExtendedEvent);
var
Listener: IListener;
ExtListener: IExtendedListener;
Obj: TObject;
begin
for Listener in FListeners do
begin
// works but smells funny
Obj := Listener as TObject;
Obj.GetInterface(IExtendedListener, ExtListener);
if Assigned(ExtListener) then
ExtNotifyee.HandleExtendedEvent(AEvent);
end;
end;
您应该使用Sysutils.Supports来检查特殊接口
uses
SysUtils;
TSomeClass.Notify(AEvent: TMyExtendedEvent);
var
Listener : IListener;
ExtListener : IExtendedListener;
begin
for Listener in FListeners do
if Supports( Listener, IExtendedListener, ExtListener ) then
ExtListener.HandleExtendedEvent( AEvent );
end;
翻译自:https://stackoverflow.com/questions/14342263/how-do-i-check-whether-an-interfaced-object-implements-another-interface
以上就是本文的全部内容,希望本文的内容对大家的学习或者工作能带来一定的帮助,也希望大家多多支持 码农网
猜你喜欢:- 面向对象接口多态
- 区块链技术语言(二十五):面向对象——接口
- Golang面向对象编程之继承&虚基类【组合&接口】
- 面向对象基本原则(1)- 单一职责原则与接口隔离原则
- [ PHP 内核与扩展开发系列] 类与面向对象:接口实现与类的继承
- c# – JSON.NET:如何反序列化基于parent(holder)对象值的接口属性?
本站部分资源来源于网络,本站转载出于传递更多信息之目的,版权归原作者或者来源机构所有,如转载稿涉及版权问题,请联系我们。
编程珠玑(续)(修订版)
【美】Jon Bentley 乔恩•本特利 / 钱丽艳、刘田 / 人民邮电出版社 / 2015-2 / CNY 35.00
历史上最伟大的计算机科学著作之一 融深邃思想、实战技术与趣味轶事于一炉的奇书 带你真正领略计算机科学之美 多年以来,当程序员们推选出最心爱的计算机图书时,《编程珠玑》总是位于前列。正如自然界里珍珠出自细沙对牡蛎的磨砺,计算机科学大师Jon Bentley以其独有的洞察力和创造力,从磨砺程序员的实际问题中凝结出一篇篇不朽的编程“珠玑”,成为世界计算机界名刊《ACM通讯》历史上最受欢......一起来看看 《编程珠玑(续)(修订版)》 这本书的介绍吧!