with query1 do
begin
params[0].datatype:=ftdatetime;
params[0].Value:='1988-05-01';
open;
end;
begin
params[0].datatype:=ftdatetime;
params[0].Value:='1988-05-01';
open;
end;
解决方案 »
- 在程序运行时,动态添加ado字段问题,相当于在设计时的 add all fields
- edit 控件
- 求最简单、便携数据库方法
- 存储过程的varchar类型参数问题
- 初学Delphi,毕业设计有困难,请帮个忙
- 那个版本的qreport的 qrdbdbtext能够自动换行,在线等
- richtext控件
- Delphi里的用于运行可执行程序的函数是哪一个?
- Delphi中调用C++中导出的成员函数问题
- 求DLL与调用进程互通数据方法(很多的,什么类型都有),在最好有人能详细说说
- 这样的查询语句怎么写??
- 想写个Component,以TComponent为基础,Install时,“program or unit 'TTst.pas' Recursively uses itself”
select * from basic_bingren
where chushengnianyue<:datewith query1 do
begin
params[0].datatype:=ftdatetime;
params[0].Value:='1900-01-01';
open;
end;
query1.sql.add('select 书号 from jhshu where 人员编号=:code1 and 还书日期=:date1');
query1.parambyname('code1').asdatetime:=strtodatetime('2002-01-01');
query1.parambyname('code2').asdatetime:=strtodatetime('2002-01-02');
query1.open;
不過這好像也與配置環境有關,即你所設的最小日期減1天即為NULL值.
select 书号 from jhshu where 人员编号=:code1 and 还书日期 is null’
构造一个动态sql,这样今后的查询比较容易改,而用了带参数的sql,则比较死。