解决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
:= ':';