如何将对象方法作为参数传递给Delphi,然后调用?
发布时间:2020-12-15 10:14:27 所属栏目:大数据 来源:网络整理
导读:我恐怕这可能是一个虚拟的问题,但它让我很沮丧。 我正在寻找将对象的方法传递到过程中的最简单的方法,以便该过程可以调用对象的方法(例如,在超时之后,或者可能在不同的线程中)。所以基本上我想: 捕获对象方法的引用。 通过对程序的引用。 使用该引用,
我恐怕这可能是一个虚拟的问题,但它让我很沮丧。
我正在寻找将对象的方法传递到过程中的最简单的方法,以便该过程可以调用对象的方法(例如,在超时之后,或者可能在不同的线程中)。所以基本上我想: >捕获对象方法的引用。 我想我可以使用接口实现相同的效果,但我认为有另一种方法,因为这个“对象的过程”类型声明存在。 以下不行,但可能有助于解释我在哪里困惑吗? interface TCallbackMethod = procedure of object; TCallbackObject = class procedure CallbackMethodImpl; procedure SetupCallback; end; implementation procedure CallbackTheCallback(const callbackMethod: TCallbackMethod); begin callbackMethod(); end; procedure TCallbackObject.CallbackMethodImpl; begin // Do whatever. end; procedure TCallbackObject.SetupCallback; begin // following line doesn't compile - it fails with "E2036 Variable required" CallbackTheCallback(@self.CallbackMethodImpl); end; (一旦问题得到回答,我会删除上述代码,除非它有助于解释某种方式。) 解决方法
只需删除指针的东西。德尔福会为你做的:
procedure TCallbackObject.SetupCallback; begin CallbackTheCallback(CallbackMethodImpl); end; (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |