Delphi 需要对TControlScrollbar进行某种更改

我需要关于表单上的标准滚动条（TControllScrollbar类）的帮助。这种滚动条没有可用的OnChange事件，但我需要以某种方式截获它或相关的Windows消息。你知道怎么做吗？

---

我只是想告诉大家，WM_VSCROLL或WM_HSCROLL消息的消息处理程序对我来说不起作用，因为它们只在手动滚动时触发（如OnScroll事件）。在我的例子中，滚动是由代码执行的，而不是手动执行的。

从Delphi XE3源代码的快速查看中，我可以说您的机会非常小。setter（如果您使用它进行手动滚动）调用的函数似乎并不关心

WM_*SCROLL

通知。如果滚动是由您的代码执行的，那么该代码是否也会生成一些事件供您使用为什么您要使用TControlScrollbar？TScrollbar具有更多的功能imho@LHristov，

t控制滚动条

由

TScrollingWinControl

类内部使用。因此，控件（例如，

TScrollBox

、

TForm

或

TFrame

将其用于滚动条。问题是这些控件都没有

OnScroll

事件。