淘宝客网站api陕西网站设计

        在使用SQLite的时候，肯定需要使用到日期型数据类型，但是SQLite没有直接支持日期类型，比如在其他数据库中支持的DateTime类型，在Delphi中是TDateTime类型。

那么实际处理中应该如何处理呢？

可以使用两种方式类在SQLite中表示日期类型：

第一种，将字段类型定义成整形（Integer），那么在Delphi中就使用Unix日期类型，写入数据的时候使用DateTimeToUnix函数将Delphi的TDatetime转换成整形，然后写入数据库，读出整形数字后使用UnixToDateTime函数将读出的整形转换成TDateTime类型即可。缺点是没有包含毫秒数据。

第二种，将字段类型定义成浮点（real），那么在Delphi中就可以直接使用TDateTime日期类型写入数据。但是读出时需要定义成Float类型,而不是使用DateTime类型。包含毫秒

举例如下：

varSQL : string;Q   : TFDQuery;D : Int64;T : TDateTime;
beginSQL := 'SELECT * FROM Table_language WHERE cn = "AAAAA"';Q := TFDQuery.Create(nil);Q.SQL.Text := SQL;Q.Connection := FDConnection;Q.Open;//D1是整形 D := Q.FieldByName('D1').AsInteger;T := UnixToDateTime(D);SQL := FormatDateTime('YYYY-MM-DD hh:mm:ss zzz',T);//写入Q.FieldByName('D1') := DateTimeToUnix(Now);//D2是RealT := Q.FieldByName('D2').AsFloat;  //不能用 AsTDateTimeSQL := FormatDateTime('YYYY-MM-DD hh:mm:ss zzz',T);//写入Q.FieldByName('D2') := Now;
end;