adodm.report1ADOQ.Close;
adodm.report1ADOQ.SQL.Clear;
adodm.report1ADOQ.SQL.Add('select Sum(hire) from borrowed where borrowtime=:A');
adodm.report1ADOQ.Parameters.ParamByName('A').Value:=DateTimePicker5.DateTime;
adodm.report1ADOQ.Open;
showmessage(adodm.report1ADOQ.Fields[0].AsString);
为什么showmessage显示为空,我borrowed表里是有值的,
adodm.report1ADOQ.Close;
adodm.report1ADOQ.SQL.Clear;
adodm.report1ADOQ.SQL.Add('select Sum(hire) from borrowed where goodsno=''1''');
adodm.report1ADOQ.Open;
showmessage(adodm.report1ADOQ.Fields[0].AsString);这样又可以,难道是DateTimePicker这里错了吗,请高手帮忙
adodm.report1ADOQ.SQL.Clear;
adodm.report1ADOQ.SQL.Add('select Sum(hire) from borrowed where borrowtime=:A');
adodm.report1ADOQ.Parameters.ParamByName('A').Value:=DateTimePicker5.DateTime;
adodm.report1ADOQ.Open;
showmessage(adodm.report1ADOQ.Fields[0].AsString);
为什么showmessage显示为空,我borrowed表里是有值的,
adodm.report1ADOQ.Close;
adodm.report1ADOQ.SQL.Clear;
adodm.report1ADOQ.SQL.Add('select Sum(hire) from borrowed where goodsno=''1''');
adodm.report1ADOQ.Open;
showmessage(adodm.report1ADOQ.Fields[0].AsString);这样又可以,难道是DateTimePicker这里错了吗,请高手帮忙
解决方案 »
- 请教一个读内存的问题
- 请教关于TStringList的几个问题,a,b,c:TStringlist.问题1:怎样把a,b合并成c ,即:类似于:c := a+b.详细见内容。
- 第二期:CSDN联盟榜--本期打榜者:aiirii(爱的眼睛)
- 这里真的就没有高手吗?看来高手从来不需要交流啊!高手进来!只会up的别来啊!
- *****怎么复制一个隐藏窗口(即窗口未显示,但已经创建)上的所以内容到TImage!!(在线)****
- 密码框
- 寻求D7+SQL2K的通用权限管理模块
- XP Menu 可否使其对工具栏不起作用?
- 请各位提供制作帮助文件软件的下载地址(比较好的)
- 我靠,大家在比谁发的快,就是没人回答问题。哈哈。
- 怎样才能知道一个字符在一个字符串中最左边的那个的位置啊?!
- indy10 TCPSERVER取不到客户端IP地址
这样试下:
adodm.report1ADOQ.SQL.Add('select Sum(hire) from borrowed where borrowtime=:A');
换为
adodm.report1ADOQ.SQL.Add('select Sum(hire) from borrowed where borrowtime=''2008-04-28'''); 2008-04-28 可以是你borrowtime里的一个值,看一下ok不
可以换date 其实直接
adodm.report1ADOQ.SQL.Add('select Sum(hire) from borrowed where borrowtime='+
QuotedStr(formatdatetime('yyyy-MM-dd',DateTimePicker5.DateTime))); 也可以