Delphi中带有鼠标轮事件的DBGrid控件的设计与应用

在Delphi7环境下,以DBGrid控件为基类,设计一个新的控件,使其支持鼠标轮的滚动事件,并对新控件的鼠标轮事 件编程,实现数据记录的上下滚动。

Delphi7中DBGrid控件鼠标滚轮事件的实现方法

针对Delphi7软件中TDBGrid控件内数据量超出屏幕时无法用鼠标进行上下滚动的问题,设计了2种支持鼠标滚轮的方法。通过自行设计包含鼠标滚动事件的TDBGrid控件或通过对Delphi7自身TApplicationEvents控件的控制,实现数据的翻屏或逐条滚动。分析结果证明:2种方式都通过截获Windows操作系统中的消息,达到对TDBGrid控件支持鼠标轮的滚动事件的目的。