Delphi 日期格式固定

Delphi 日期格式问题

我用
strtodate('2001-12-30') 出现'is not a valid date '错误
我查看 控制面板->区域设置->日期
发现日期 分隔符号用了 '/' 如果改为'-'就没有问题

解决办法：

在主程序的OnCreate事件中加入:

DateSeparator := '-';

ShortDateFormat := 'yyyy-mm-dd';

LongDateFormat := 'yyyy-mm-dd';