delphi VirtualTreeView未使用鼠标滚轮滚动

mv1qrgav  于 2023-05-22  发布在  其他
关注(0)|答案(1)|浏览(210)

使用: Delphi 10.2.3 Tokyo,VCL Forms应用程序,Windows 10 Pro,最新的TVirtualStringTree
我有一个填充了许多节点的TVirtualStringTree,垂直滚动条是可见的。但是,当尝试使用鼠标滚轮滚动时,什么也没有发生。是否有需要启用的设置,或者控件默认不支持鼠标滚轮滚动(即。而无需在事件处理程序中编写任何附加代码)?

eh57zj3b

eh57zj3b1#

此组件中没有为此进行特殊设置。只是你的VirtualTreeView组件没有得到MouseScroll Windows事件。
我遇到了同样的问题,在我的例子中,底层窗体/窗口有一个TApplicationEvents,它首先获得所有Windows消息(即使上面有一个带有我的VT组件的新窗体)并设置Handled = true。
在此TapplicationEvents的OnMessage函数中,我 Package 了...

if ( ( MyVTForm == NULL ) || !MyVTForm->Visible ) {
...
}

...周围,它现在工作(对不起,C++ Builder代码)。

相关问题