Delphi 5将类型转换为计算类型会导致无效的类型转换错误

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

导读：我需要将Variant转换为TNotifyEvent,但不能. 如图所示,我使用GetPropValue来获取TMenuItem的OnClick属性.我必须将它与另一个TNotifyEvent进行比较,所以我必须将它也转换为TNotifyEvent. 在运行时,这总是TNotifyEvent的类型,但是当我尝试将其强制转换为TNotif

debug time

我需要将Variant转换为TNotifyEvent,但不能.

如图所示,我使用GetPropValue来获取TMenuItem的OnClick属性.我必须将它与另一个TNotifyEvent进行比较,所以我必须将它也转换为TNotifyEvent.

在运行时,这总是TNotifyEvent的类型,但是当我尝试将其强制转换为TNotifyEvent时,代码无法编译.

我怎样才能使它工作？不幸的是我只有Delphi版本5,因此RTTI功能有限.

解决方法

你正在调用错误的方法.而不是GetPropValue,你需要GetMethodProp.像这样：

TNotifyEvent(GetMethodProp(MenuItem,'OnClick'));

（编辑：李大同）

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