query1.close;
query1.sql.clear;
query1.sql.add('select * from your_table where your_date between :d1 and :d2');
query1.parambyname('d1').asstring:='1950-01-01';
query1.parambyname('d2').asstring:='1980-01-01';
try
query1.open;
except
query1.execsql;
end;
query1.sql.clear;
query1.sql.add('select * from your_table where your_date between :d1 and :d2');
query1.parambyname('d1').asstring:='1950-01-01';
query1.parambyname('d2').asstring:='1980-01-01';
try
query1.open;
except
query1.execsql;
end;
解决方案 »
- 请问mediaplayer控件如何播放ac3格式的视频?
- 1000分求邻小区拓扑关系算法
- 怎样做让自己的程序运行之后,看不到界面,在状态栏那里也看不到,只能在任务管理器里面能够看到它,该怎样 做。谢谢了
- 求delphi7里的一个动动!
- 怎么返回opendialog1.filename的不带目录不带扩展名的纯文件名
- 100分 调用DLL文件错误提示:Exception:EResNotFound in Module DLL.dll at000318C4
- 一個簡單的存儲過程,傳遞參數失敗.
- 高手请进,关于隐藏窗体
- 就是sql的 问题??
- 谁有Install Shield For Delphi的更高版本,我现在用的是For Delphi 4.0 Beta
- 请问一下用什么打开*.pdg文件?
- 转贴:怎样将桌面上的文字改成透明?
既然大家思路一样,如果得分
就一起分了,如果不得的话,
就没的分了。to zhuxiaojun
要给我分,就平分给大家
谢谢了,
就怕得不到,不知道答的对不对
'01/01/1950';
'01/01/1980'
试试
这个问题,好象不用我们考虑吧,
我不是很有把握,不过我试了,
一下,好象 ‘1950-01-01’
的格式,SQL可以接受
query1.close;
query1.sql.clear;
query1.sql.add('select * from your_table where your_date>:d1 and you_date<:d2');
query1.parambyname('d1').asstring:='1950-01-01';
query1.parambyname('d2').asstring:='1980-01-01';
try
query1.open;
except
query1.execsql;
end;
var FromDate,ToDate:TDateTime;
............................
FromDate:=StrToDateTime('1950-1-1');//或者直接用TDateTimePicker控件来接收 TDateTime或TDate或Ttime格式的值;
ToDate:=StrToDateTime('1980-1-1');
query1.close;
query1.sql.clear;
query1.sql.add('select * from your_table where your_date between :d1 and :d2');
query1.parambyname('d1').asDateTime:=FromDate;
query1.parambyname('d2').asDateTime:=ToDate;
query1.open;
var FromDate,ToDate:TDateTime 更改为:var FromDate,ToDate:TDate;由于在网吧上网,故无法调试,但方法是这样的,我想应该行得通的!
你试一试啦!
祝你好运!
query1.sql.clear;
query1.sql.add('select * from your_table where your_date between :d1 and :d2');
query1.parambyname('d1').asstring:='1950-01-01';
query1.parambyname('d2').asstring:='1980-01-01';
try
query1.open;
except
query1.execsql;
end;