delphi – 测试类引用(元类)变量中的类是否为TMyClass

发布时间：2020-12-15 09:19:22 所属栏目：大数据来源：网络整理

导读：我想知道从类引用创建的对象是特定类或其任何后代的实例. 换句话说,我想要一个布尔表达式,如 var is TMyClass 但是var被替换为涉及类引用变量的表达式.这听起来很容易,但让我完全难过. 我可以创建一个实例var：= classRefVar.Create,测试它,然后销毁它,但这

我想知道从类引用创建的对象是特定类或其任何后代的实例.

换句话说,我想要一个布尔表达式,如

var is TMyClass

但是var被替换为涉及类引用变量的表达式.这听起来很容易,但让我完全难过.

我可以创建一个实例var：= classRefVar.Create,测试它,然后销毁它,但这是一个巨大的开销.

奇怪的是,编译器不会让我拥有

classRefVar(nil) is TMyClass

但是对于看似等效的语法而言却很无用,但却毫无用处

TMyClass(nil) is TMyClass

显然,表达

classRefVar = TMyClass

并不好,因为classRefVar可能引用了TMyClass的后代.

当我看到答案时,我期待着自己踢…

解决方法

简单：

ClassRefVar.InheritsFrom(TMyClass)

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!