Delphi中的标准控件TDBGrid并不支持鼠标滑轮滚动来移动焦点。但能通过上下键来选择。
想这种不支持A事件但支持B事件的控件,我们可以捕获A事件,并将其转换成B事件发送给控件,在本例中,使用TApplicationEvents控件来捕获滑轮事件,并转换成上下键事件发送给TDBGrid。
添加ApplicationEvents1的OnMessage事件,如下
Delphi中的标准控件TDBGrid并不支持鼠标滑轮滚动来移动焦点。但能通过上下键来选择。
想这种不支持A事件但支持B事件的控件,我们可以捕获A事件,并将其转换成B事件发送给控件,在本例中,使用TApplicationEvents控件来捕获滑轮事件,并转换成上下键事件发送给TDBGrid。
添加ApplicationEvents1的OnMessage事件,如下