保存之前用Trunc把时间取掉
ADOBook.fieldByname('mdate').value := Trunc(DateTimePicker.date);
然后查询的时候'select * from Book where ChuDate:=:chu';
ADOBook.paramByname('chu').value := Trunc(DateTimePicker.date);
就没问题了
ADOBook.fieldByname('mdate').value := Trunc(DateTimePicker.date);
然后查询的时候'select * from Book where ChuDate:=:chu';
ADOBook.paramByname('chu').value := Trunc(DateTimePicker.date);
就没问题了
解决方案 »
- delphi调用vc dll问题
- \u60a8\u7684\u9a8c\u8bc1\u7801\u9519\u8bef我用IDHTTP接收到如此的数据然后怎么解码啊。
- 怎样让用delphi7 开发的代码自动排列成无序?
- 如何在Delphi控制Excel的时候实现复杂的表头。
- 有没有把delphi原代码转换成c++builder代码的工具?
- 请大家给小弟个思路!谢谢!
- 关于开发酒店管理系统的一些知识来者有分
- 有谁做过桌面动画精灵啊?200分送上!
- Delphi中时间的表示法?
- 关于从数据库读取word2010文档的问题,困扰我多时,请指教!
- 如何使用函数getusername
- treeview的data属性?
select * from Book where ChuDate=convert(varchar(10),日期变量,120)
或
select * from Book where convert(varchar(10),ChuDate,120)=convert(varchar(10),日期变量,120)
或者用between...and来查询
select * from book where chudate=between convert(varchar(10),日期变量,120) and convert(varchar(10),日期变量,120)
都可以
具体的convert函数使用可以参阅sql server的help!
ADOBook.paramByname('chu').value := '%'+FormatDateTime('yyyy-mm-dd',DateTimePicker.date)+'%';
....
...
query1.sql.add('field_time='+''''+dyear(datetimepicker1.Date)+'/'+
dmonth(datetimepicker1.Date)+'/'+
dday(datetimepicker1.Date)+''''+
.... ....省略
以下是我的几个自定义函数:
FUNCTION dYEAR(LdateTIME:TDATETIME):STRING;
var new_Y:STRING;
BEGIN
datetimetostring(new_Y,'yyyymmdd',LdateTime);
result:=copy(new_Y,1,4);
END;FUNCTION dMONTH(LdateTIME:TDATETIME):STRING;
var new_M:STRING;
BEGIN
datetimetostring(new_M,'yyyymmdd',LdateTime);
result:=copy(new_M,5,2);
END;FUNCTION dDAY(LdateTIME:TDATETIME):STRING;
var new_D:STRING;
BEGIN
datetimetostring(new_D,'yyyymmdd',LdateTime);
result:=copy(new_D,7,2);
END;