query1.Close;
query1.sql.Clear;
query1.sql.Add('select a.客户名称,b.产品型号,b.数量,b.单价,b.金额 from 合同档案 as a,合同内容档案 as b ');
query1.sql.Add('where a.统计编号=b.合同编号 and a.客户名称=:name and a.签订日期>:date1 and a.签订日期<:date2');
showmessage('55555');
query1.Prepare;
query1.Params[0].AsString:=trim(DBLUCombo1.Text);
query1.Params[1].AsDate:=DateTimePicker1.Date;
query1.Params[2].AsDate:=DateTimePicker2.Date;
query1.Open;
请问这段程序有什么问题,为何我执行后没任何反映,没报错,也没查询结果显示
query1.sql.Clear;
query1.sql.Add('select a.客户名称,b.产品型号,b.数量,b.单价,b.金额 from 合同档案 as a,合同内容档案 as b ');
query1.sql.Add('where a.统计编号=b.合同编号 and a.客户名称=:name and a.签订日期>:date1 and a.签订日期<:date2');
showmessage('55555');
query1.Prepare;
query1.Params[0].AsString:=trim(DBLUCombo1.Text);
query1.Params[1].AsDate:=DateTimePicker1.Date;
query1.Params[2].AsDate:=DateTimePicker2.Date;
query1.Open;
请问这段程序有什么问题,为何我执行后没任何反映,没报错,也没查询结果显示
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货