我想通过插入计时器可以执行多少次的选项来扩展 TTimer 的功能。
我的问题是我需要在 OnTimer() 事件中执行此操作。有没有办法我可以覆盖这个事件，从而保持它的原始功能？
最佳答案
大多数好的组件都有一个 protected 虚拟或动态方法，除了调用相应的事件之外什么都不做。这样，后代可以插入他们自己的与事件相关的代码，同时在将实际事件放置在表单上时，组件的最终用户仍然可以使用它。
在 TTimer 的情况下，调用 OnTimer 的方法事件是 Timer .创建 TTimer 的后代并覆盖该方法。检查你已经调用了多少次函数，如果你仍然低于限制，然后调用 inherited .
关于delphi - 在组件事件中插入指令，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/9487148/