产生原因的win7系统的短日期格式“yyyy/m/d”，在给sqlit中的日期格式字段插入当前日期时用DateTimeToStr(Now)函数，

该值有时候会在sqlite表中会有时候变成1899-12-30。要解决该问题要在主form的Create事件中设置程序的时间格式，还要设置

Application.UpdateFormatSettings := False;使程序不受系统时间格式影响。

Application.UpdateFormatSettings := False;
// 设定程序本身所使用的日期时间格式
LongDateFormat:= ‘yyyy-MM-dd‘;
ShortDateFormat:= ‘yyyy-MM-dd‘;
LongTimeFormat:= ‘hh:nn:ss‘;
ShortTimeFormat:= ‘hh:nn:ss‘;
DateSeparator:= ‘-‘;
TimeSeparator:= ‘:‘;

解决delphi 在sqlite插入日期变成1899-12-30日问题。