delphi – 如何将鼠标滚轮支持添加到TGraphicControl后代的组件中？

概述我创建了一个delphi组件,它来自TGraphicControl.是否可以添加对鼠标滚轮的支持？ —编辑— 我已经暴露了MouseWheel事件,如下所示,但它们没有被调用. TMyComponent = class(TGraphicControl)published property OnMouseWheel; property OnMouseWheelDown; propert 我创建了一个delphi组件,它来自TGraphicControl.是否可以添加对鼠标滚轮的支持？

—编辑—

我已经暴露了MouseWheel事件,如下所示,但它们没有被调用.

TMyComponent = class(TGraphicControl)published  property OnMouseWheel;  property OnMouseWheelDown;  property OnMouseWheelUp;end;

—编辑—

如下所示,我试图捕获WM_MOUSEWHEEL和CM_MOUSEWHEEL消息,但它似乎不起作用.但是我设法捕获了CM_MOUSEENTER消息.我不明白为什么我可以捕获一种类型的消息,而不是另一种消息.

解决方法 TGraphicControl来自TControl,它已经支持鼠标滚轮.请参阅wm_MouseWheel消息,DoMouseWheel,DoMouseWheelDown,DoMouseWheelUp和MouseWheelHandler方法以及WheelAccumulator属性. 总结

以上是内存溢出为你收集整理的delphi – 如何将鼠标滚轮支持添加到TGraphicControl后代的组件中？全部内容，希望文章能够帮你解决delphi – 如何将鼠标滚轮支持添加到TGraphicControl后代的组件中？所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。