delphi – TTimer.OnTimer事件处理程序是否可重入？

我的应用程序中有一个TTimer，每2秒触发一次，并调用我的事件处理程序HandleTimerEvent()。 HandleTimerEvent()函数修改共享资源，可以在返回前执行几秒钟。此外，我在事件处理程序中调用Sleep()可以放弃处理器。

我不知道C builder的TTimer对象在调用事件时如何工作，所以我刚才解释的场景让我有所思考，特别是HandleTimerEvent()是否在先前的调用返回之前被调用。

这个问题归结为几件事情。

TTimer对象是否排队事件？

TTimer对象可以在先前的调用返回之前调用我的事件处理程序吗？

解决方法

此回复假定TTimer仍然实现使用WM_Timer消息。如果实施改变了(2005年以后)，请不要顾虑。

否，TTimer对象不排队事件。它由Windows WM_Timer消息驱动，Windows不让WM_TIMER消息堆栈在消息队列中。如果下一个定时器间隔发生，Windows看到WM_Timer消息已经在应用程序的消息队列中，它不会向队列中添加另一个WM_Timer消息。 (与WM_Paint相同，btw)

是的，即使先前的事件处理程序仍在执行，TTimer.OnTimer事件也可能被触发。如果您在事件处理程序中执行允许应用程序处理消息的任何操作，则可以重新启动计时器事件。明显的一个是如果你的事件处理程序调用Application.ProcessMessages，但它可以比这更微妙 – 如果你在事件处理程序中调用的任何内部调用Application.ProcessMessages，或调用PeekMessage / GetMessage dispatchMessage，或打开一个模态对话框，或者调用绑定到进程外COM对象的COM接口，那么应用程序消息队列中的消息将被处理，并且可能包含下一个WM_Timer消息。

一个简单的解决方案是在您输入定时器事件处理程序时禁用定时器对象，并在退出定时器事件处理程序时重新启用它。这将阻止定时器消息在您的事件处理程序仍在工作时触发，而不管代码的消息处理特性如何。