Delphi 如何创建实时递增值的滑块

我的任务是在Delphi（7或XE3）中为慈善机构创建一个在Windows下运行的程序。我想创建一个类似于iPhone屏幕亮度调节器的平滑滑块，只是它应该增加用户希望捐赠给慈善机构的钱的价值

主要目标是在用户拖动滑块时调整该值，而不是在用户释放滑块时更新该值

是否有具有此功能的内置组件

---

（注：我正在上高中的最后一年，如果能说得尽可能简单，我将不胜感激。）

假设您正在为Windows开发VCL应用程序（Delphi 7和XE3都不是针对iPhone的），您可以使用标准的TTrackbar并在OnChange活动中调整货币价值。

无论如何，让用户输入他们想捐赠多少钱不是更容易吗？是的，这是一个VCL应用程序，提到iPhone只是为了描述我希望它的外观。谢谢，我会试试的。