delphi - 如何转换不同格式的日期和时间？

Question

我拥有的数据

我有一个数据存储在数据库中，其中日期和时间存储为字符串。

该数据存储在中央服务器上。在此数据中，日期和时间以不同的格式存储(根据客户端计算机的日期时间格式而变化)。

我想做

现在，我想将这些所有不同格式的日期和时间字符串转换为“yyyy-mm-dd hh:mm:ss”格式。

我面临的问题

我无法将具有多种日期时间格式的日期时间数据转换为单一格式。

示例:我的机器日期时间格式是yyyy-mm-dd。但是当我尝试转换下面的日期时

StrToDateTime('2015/02/10')

它抛出异常。

谁能告诉我如何才能实现这一目标？如果需要更多详细信息，请告诉我。预先感谢您。

Answer 1

您需要自定义日期格式设置，如下所示:

procedure Test;
var
  DT: TDateTime;
  FS: TFormatSettings;

begin
  FS:= TFormatSettings.Create;
  FS.DateSeparator:= '/';
  FS.ShortDateFormat:= 'yy/m/d';
  DT:= StrToDateTime('2015/02/10', FS);
  Writeln(FormatDateTime('dd mm yyyy', DT));
end;