query1.close;
query1.sql.clear;
query1.sql.add('select * from tablename 'where pdate=:pdate and ptime>=:ptime and ptime<=:ptime1 ');
query1.parameters[0]:=datetimepicker1.date;
query1.parameters[1]:=datetimepicker2.date;
query1.parameters[2]:=datetimepicker3.date;
query1.open;
用参数,这样可以了吧
query1.sql.clear;
query1.sql.add('select * from tablename 'where pdate=:pdate and ptime>=:ptime and ptime<=:ptime1 ');
query1.parameters[0]:=datetimepicker1.date;
query1.parameters[1]:=datetimepicker2.date;
query1.parameters[2]:=datetimepicker3.date;
query1.open;
用参数,这样可以了吧
解决方案 »
- delphi钩子编程
- chart应用,初学都,请懂的进来帮忙解决下,先谢谢了!!!!急!!!50分!!!
- idhttp上传,一直搞不定,请大家帮忙了,不胜感激!
- 如何改变 DBgridEh 3 控件的 滚动条 样式 ?????????????急!!!!!!!!!!!!!
- 串口发给我的是十六进制数,我该如何正确接受并显示信息,急!解决一定结贴!
- tidhttp新问题在线等待,急急急(绝对高分)
- 关于adoquery
- 网管帮手。远程重启工具。
- 可不可以让StringGrid的不同cell响应不同的事件?有高分啊!!!!!
- Delphi 如何引用DCU文件,老师提示没有PAS
- 象QQ那种我的好友,陌生人,黑名单下拉菜单是什么组件?
- 请问d6中reopen里打开过的文件记录怎么删掉?
query1.sql.clear;
query1.sql.add('select * from tablename');
query1.sql.add('where pdate='#39+dattimepicker1.DateTime+#39);
query1.sql.add('and ptime>='#39+datetimepicker2.DateTime+#39);
query1.sql.add('and ptime<='#39+datetimepicker2.DateTime+#39);
query1.open;
这几句好象少+号把
query1.sql.add('where pdate=' + #39+dattimepicker1.date+#39);
另外要注意and前后都要有空格啊,
query1.sql.add(' and ptime>='#39+datetimepicker2.time+#39);
又少加号,还有你得用DateToStr把日期类型变成字符串啊,
这样看看
query1.sql.add(' and ptime>='''+datetostr(datetimepicker2.time)+'''');
PHour, PMin, PSec, PMSec:WORD;
implementationprocedure GETDECODETIME;OVERLOAD;
begin
DecodeDate(NOW, Year, Month, Day);
DecodeTime(NOW, Hour, Min, Sec, MSec);
end;procedure TForm1.Button1Click(Sender: TObject);
begin
GETDECODETIME;
edit1.Text:=inttostr(Hour)+':'+inttostr(Min)+':L'+inttostr(Sec);
end;
剩下的你自己可以搞定了吧?
再者你注意应该有空格的地方就要给空格
query1.close;
query1.sql.clear;
query1.sql.add('select * from tablename ');
query1.sql.add('where pdate = '#39+dattimepicker1.DateTime+#39);
query1.sql.add(' and ptime >= '#39+datetimepicker2.DateTime+#39);
query1.sql.add(' and ptime <= '#39+datetimepicker2.DateTime+#39);
query1.Perpare;
query1.open;
Formats a TDateTime value.
你们给我的方法我都试过了,
下面的方法还没时间试呢formatDatetime('hh:mm:ss',DateTimePicker.Date)我用
showmessage(dattimepicker1.time)
可以显示正确的时间但是就是不显示正确的查询结果.帮忙看看好吗?
startdate:=formatdatetime('yyyy"-"mm"-"dd" ',dattimepicker1.date);starttime:=formatdatetime('yyyy"-"mm"-"dd" "hh":"ss',dattimepicker1.date);endtime:=formatdatetime('yyyy"-"mm"-"dd" "hh":"ss',dattimepicker2.date);query1.close;
query1.sql.clear;
query1.sql.add('select * from tablename');
query1.sql.add('where pdate='''+startdate+''' ');
query1.sql.add('and ptime>='''+starttime+''' ');
query1.sql.add('and ptime>='''+endtime+''' ');
query1.open;