2011-02-16 35 views
1

从我last question跟进,每当我用不同的日期/时间格式的系统上运行它,我仍然得到错误。我正在使用日期编辑和时间编辑框来选择我的日期和时间值。日期编辑格式为dd-mm-yy,我的时间编辑格式为hh:mm。当我将它们保存到TDateTime变量dtLastOnline时,我得到'xx-xx-xx不是有效的日期和时间值'错误。“XX-XX-XX是不是一个有效的日期和时间值”错误

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

我如何确保我的应用程序有无论它是从运行相同的日期/时间显示格式?

我尝试设置ShortDateFormat,LongDateFormat等,但将无法工作。

谢谢!

+2

您还没有在错误发生时给予我们的代码行。你提供的代码是一个简单的浮点加法。此外,您不希望自己的应用在任何运行时都具有相同的日期/时间格式。您想要使用适合用户区域设置的格式。我无法理解美国约会,而美国人无法理解英国约会。不要强迫你的语言环境,它不会工作! – 2011-02-16 12:26:22

+0

它同样在我看来应该像``Trunc()`应用Date值并且从Time值中减去`Trunc(Time)`,以便它们在适当的范围内。你需要Date的组成部分和Time的小数部分。 – 2011-02-16 12:34:32

回答

3

我想有两个TDateTimePickers,一组保存数据,和一个举行时间。那是你在做什么?

我发现我下面的作品没有任何错误:

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

输出是:

enter image description here

相关问题