Delphi：使用 XSDateTime 而不将时间转换为本地时区

Question

我正在 Delphi 中编程并使用一个 API，该 API 返回代表约会时间段的 XSDateTime。当我尝试创建本地数据时间时，时间将转换为我的 EST 时区（Z-05:00 或 Z-04:00，具体取决于 DST）。我需要时间保留在 CST 的原始时区 (Z-06:00)。我目前正在按如下方式格式化时间：

aApptListing := FormatDateTime('yyyy/mm/dd t', aSlots[i].StartDateTime.AsDateTime);

其中 StartDateTime 为 CST 时间 (Z-06:00)。如何保留原来的 CST 时间？例如，如果通过 API 提供的日期/时间为“2011-12-25T08:00:00-06:00”，我想显示 12/25/2011 @ 8:00 AM，而不是 9:00 AM是美国东部时间。

Answer 1

看起来以下应该有效：

with aSlots[i].StartDateTime do
  aApptListing := FormatDateTime('yyyy/mm/dd t', EncodeDateTime(Year, Month, Day, Hour, Minute, Second, 0));