我在一个框架中有几个TStringGrid组件。我想禁用TStringGrid组件的鼠标滚轮,但为框架启用它,这样当鼠标滚轮移动时,框架会向上或向下滚动,而不是更改网格中的单元格选择。
我尝试为每个TStringGrid组件设置为OnMouseWheelDown和OnMouseWheelUp添加空方法(这不起作用)。

发布于 2020-08-08 08:29:46
修改框架上的OnMouseWheel事件处理程序:
void __fastcall TFrameNameOfFrame::FrameMouseWheel(TObject *Sender, TShiftState Shift,
int WheelDelta, TPoint &MousePos, bool &Handled)
{
this->VertScrollBar->Position += WheelDelta;
}https://stackoverflow.com/questions/63238851
复制相似问题