德尔福XE7。如何计算不同的时区？

Question

我知道此问题已被问过百次，但我很难找到Delphi Firemonkey XE7的解决方案。

我可以使用Winapi.Windows（如Convert TDateTime to Another Time Zone Regardless of Local Time Zone中所述），但Firemonkey的解决方案是什么？