[delphi] 使用strtoDatetime在不同操作系统出现不同的情况

   str:=  '2010-4-13   06:22:22';   

   strtoDateTime(str);   

　　现象：在winxp,win2003 都不会报错

但是在windows7,windows server 2008 上，报 ‘xxx’  is not a valid  date and time  错误

后来发现不同操作系统的默认的 短日期样式 是不同的

 winxp,win2003 默认短日期样式是 xxxx-xx-xx

 windows7,windows server 2008 默认短日期样式是 xxxx/x/xx

 可以通过 控制面板---->区域设置------->日期----->短日期样式  查看

 

为了程序有更好的兼容性，可以进行注册表修改 

 

HKEY_CURRENT_USER\Control   Panel\International其中的sDate项将其值强制设置成'/'，

 

 这个办法不是非常好，最好的是程序做判断，适应系统，而不是更改系统设置来适应程序