delphi - 如何将 ISO 8601 字符串转换为 Delphi TDate？

Question

我可以使用以下命令轻松地将 Delphi TDate 转换为 ISO 8601 格式:

DateTimeToString(result, 'yyyy-mm-dd', myDate);

进行逆转换的惯用方法是什么？ StringToDateTime() 似乎不存在。

显然，我可以通过手动解析字符串并对结果进行编码来以“硬”方式完成此操作，但这似乎是一个糟糕的选择。

Answer 1

为什么要重新发明轮子？

XML 使用 ISO 8601 进行日期和日期时间存储。

自 Delphi 6 以来，Delphi 已内置对此的支持 XSBuiltIns单位。

This answer explains how对于 DateTime，这仅适用于使用 TXSDate 的 Date类:

with TXSDate.Create() do
  try
    AsDate := Date; // convert from TDateTime
    DateString := NativeToXS; // convert to WideString
  finally
    Free;
  end;

with TXSDate.Create() do
  try
    XSToNative(DateString); // convert from WideString
    Date := AsDate; // convert to TDateTime
  finally
    Free;
  end;