不修改系统日期和时间格式,解决Delphi报错提示 '****-**-**'is not a valid date and time

不修改系统日期和时间格式,解决Delphi报错提示 '****-**-**'is not a valid date and time

假如操作系统的日期格式不是yyyy-MM-dd格式,而是用strtodate('2014-10-01')) 来转换的话,程序会提示爆粗 '****-**-**'is not a valid date and time

不修改系统日期和时间格式,解决Delphi报错提示 '****-**-**'is not a valid date and time

解决方法:

只需要在程序启动时添加以下代码,就可以不用修改系统日期和时间格式,就能解决上述报错

  DateSeparator := '-';//日期分隔符
  LongDateFormat := 'yyyy-MM-dd'; //长日期格式
  ShortDateFormat :=  'yyyy-MM-dd'; //短日期格式
  LongTimeFormat := 'HH:nn:ss';
  ShortTimeFormat := 'HH:nn:ss';
  Application.UpdateFormatSettings := False;