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

产生原因的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 := ':';