delphi/firemonkey：如何制作动态卷轴？

我在德尔福和火猴手下。我通过OnGeture事件管理自己的卷轴。我想在卷轴上添加一些类似“动能”的效果

例如，你把手指放在屏幕的底部，然后快速地将其移动到顶部，然后将其从屏幕上移除。结果是屏幕的滚动比你移开手指的地方要大得多，就像你给了滚动一些动能一样。另一方面，如果你没有在最后把手指从屏幕上移开，那么你就不会给卷轴任何动能

---

你知道怎么做吗？

你可以用

TVertScrollBox

在屏幕上产生动能。这将对您有所帮助。

但是TVertScrollBox的动能非常慢：（我想要更强劲的，它不能在TVertScrollBox中配置：（如果您有预定义的项目或任何动态列表，您可以使用TListBox。它有非常酷的动能，您也可以添加您的项目。如果您需要，我可以向您发送示例。