delphi 如何让ScrollBox的内容与滚动条一起实时滚动

拖动滚动条后只有释放鼠标键，ScrollBox的内容才会滚动到实际位置，不爽。请问高人，怎样才能使拖动ScrollBox的滚动条的同时实时滚动内容？

    在OBject Inspector 里 将ScrollBox 的

 垂直同步实时滚动    VertScrollBar 里的Tracking设为True 即可
 水平同步实时滚动    HorzScrollBar 里的Tracking设为True 即可