字段:单据号码(djhm) 款号(kh) 颜色(YS) 数量(sl)
2009001 55 黄色 200
2009001 55 黄色 300
2009001 55 红色 200
2009001 55 红色 300
2009001 55 紫色 200
2009001 55 紫色 300
计算出来的结果在DBGRID内显示出来为:
单据号码 款号 颜色 数量
2009001 55 黄色 500
2009001 55 红色 500
2009001 55 紫色 500 现在要将统计出来的结果用RMReport打印出来。请问怎么可以实现?
2009001 55 黄色 200
2009001 55 黄色 300
2009001 55 红色 200
2009001 55 红色 300
2009001 55 紫色 200
2009001 55 紫色 300
计算出来的结果在DBGRID内显示出来为:
单据号码 款号 颜色 数量
2009001 55 黄色 500
2009001 55 红色 500
2009001 55 紫色 500 现在要将统计出来的结果用RMReport打印出来。请问怎么可以实现?
我没有数据集。直接连接的QUERY1。RMReport中字段连接如下
memo1 - query1djhm memo2- query1ys ................
一点统计按钮,打印预览就没有数据。我贴我的源码上来。procedure TForm2.Button1Click(Sender: TObject);//统计
var
cx1:string;
begin
cx1:=trim(cx.Text);
query1.Close;
query1.SQL.Clear;
query1.SQL.Add('select djhm as 单据号码,CH as 床号,kh as 款号,ys as 颜色,RQ as 日期, sum(SL) as 合计 from bb where djhm="'+cx1+'" group by DJHM,ys,kh,CH,RQ');
query1.Open;
DataSource1.DataSet:=query1;//之前是用table1显示数据,查询后就显示query1查询出来的结果。
end;procedure TForm2.Button10Click(Sender: TObject);//打印预览
begin
RMReport1.ShowReport;
end;
memo1 - query1djhm
memo2- query1ys
................ 现在只要一点统计按钮就,报表内就没有数据显示。