在 Delphi FireMonkey XE7 中将字符串转换为日期时间时出错

Question

我在移动设备的 FireMonkey 中将字符串转换为 TDateTime 时遇到问题。

总是报错，不知道怎么办。

我告诉你我是怎么做的：

function StringToDateTime(DateStr: String): TDateTime;
var
  FS: TFormatSettings;
begin
  result := now;
  FS:= TFormatSettings.Create;
  FS.DateSeparator := '-';
  FS.DateSeparator := ':';
  FS.ShortDateFormat := 'dd-mm-yyyy';
  FS.ShortTimeFormat := 'hh:nn:ss';
  try
   Result := StrToDateTime(DateStr, FS); //the format of the string is : 
         // dd-mm-yyyy hh:nn:ss  '31-03-2015 9:36:00'
  except on E: Exception do
   ShowMessage(e.ToString);
  end;

end;

异常给出：

'31-03-2015 9:36:00' is not a valid date and time.

Answer 1

您正在配置 DateSeparator 两次

  FS.DateSeparator := '-';
  FS.TimeSeparator := ':';

在 Delphi FireMonkey XE7 中将字符串转换为日期时间时出错

Error converting string to datetime in Delphi FireMonkey XE7

delphi

tdatetime

delphi-xe7