delphi – InheritsFrom和is运算符之间有什么区别?
发布时间:2020-12-15 04:23:12 所属栏目:大数据 来源:网络整理
导读:在所有情况下我都记得,以下说明给出了相同的结果: type TMyClass = class(TObject); TMyChildClass = class(TMyClass);var MyObj : TMyChildClass;procedure TForm1.Test();var ResultA : Boolean; ResultB : Boolean;begin //Using TObject.InheritsFrom R
在所有情况下我都记得,以下说明给出了相同的结果:
type TMyClass = class(TObject); TMyChildClass = class(TMyClass); var MyObj : TMyChildClass; procedure TForm1.Test(); var ResultA : Boolean; ResultB : Boolean; begin //Using TObject.InheritsFrom ResultA := MyObj.InheritsFrom(TMyClass); //Using 'is' operator ResultB := MyObj is TMyClass; //Showing results ShowMessage( 'InheritsFrom = ' + BoolToStr(ResultA,True) + sLineBreak + 'is = ' + BoolToStr(ResultB,True) ); end; 使用is运算符而不是TObject.InheritsFrom函数有什么不同吗? 解决方法
is运算符构建在InheritsFrom之上.所以,
obj is TSomeClass 实现为 (obj <> nil) and obj.InheritsFrom(TSomeClass) 表达式obj.InheritsFrom(TSomeClass)可能有点令人困惑,因为它看起来像InheritsFrom是一个实例方法.实际上,InheritsFrom是一个类方法,obj的运行时类作为Self指针传递给InheritsFrom. 所以从根本上说,和InheritsFrom执行相同的任务,至少在限制对类的注意时.注意,它更通用,也可以与接口一起使用. 有明显的语法差异.即,这需要一个实例,而InheritsFrom是一个类函数.虽然,正如我们所看到的,Delphi语言确实支持在实例引用上调用类函数.另一个明显的区别是,它有一个内置的参考测试. 这些只是语法上的差异,但基本操作是相同的,正如调用InheritsFrom的事实所证明的那样. (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |