delphi - “xx-xx-xx不是有效的日期和时间值”错误

Question

从last question进行跟踪之后，每当在具有不同日期/时间格式的系统上运行该错误时，仍然会收到错误消息。我正在使用日期编辑和时间编辑框来选择我的日期和时间值。日期编辑的格式为dd-mm-yy，我的时间编辑的格式为hh:mm。当我将它们保存到TDateTime变量dtLastOnline时，出现“ xx-xx-xx不是有效的日期和时间值”错误。

我将dtLastOnline设置为dtLastOnline := dedtLastOnline.Date + tpLastOnline.Time;

如何确保我的应用程序无论从哪里运行都具有相同的日期/时间格式？

我尝试设置ShortDateFormat，LongDateFormat等，但是无法正常工作。

谢谢！

Answer 1

我尝试了两个TDateTimePickers，一个用于保存数据，另一个用于保存时间。那是你在做什么吗？

我发现以下对我有用，没有错误：

var
  dt: TDateTime;
  ...
dt := DateOf(DatePicker.Date) + TimeOf(TimePicker.Time);
ShowMessage(FormatDateTime('c', dt));

输出为：