因为要用到，所以特意添加了这么个方法，FMX 的 TCustomScrollBox 没有提供，或者是我没有找到正确的，所以特意加了一个。另外，针对 TControl 加了一个 LocalToParent 函数用于将指针的坐标转换为指定级别的父控件的坐标。 完整源码奉上，但声明下，我只测试了一部分我用到的情况，其它情况没